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Algo más sobre los condicionales 


A conocemos la forma de 
establecer una determinada 
condición dentro de un pro- 
ceso realizado en Logo. 

Conozcamos otras po- 
sibilidades que nos ofrecen 
algunas versiones de Logo, 
para determinar condicio- 

nes. 

Una condición hay que iniciarla utilizan- 
do la orden SI seguida de una expresión, bien 
sea ésta una expresión de relación, una expre- 
sión lógica o una combinación de ambas. 

La expresión que interviene en la con- 
dición devuelve dos posibles resultados, 
CIERTO o FALSO, y dependiendo del que se 
trate, se ejecuta una acción u otra. 

La forma de expresarlo es: 


SI condición [Acción 1] 
Se cumple la 
condición 
[Acción 2] 
No se cumple la 
condición 
Esta expresión condicional podemos 

desdoblarla de la siguiente forma: 


SI condición CIERTA [Acción 1] 
SI condición FALSA [Acción 2] 


Algunas versiones de Logo permiten la 
posibilidad de indicar una determinada ac- 
ción a tomar, preguntando directamente por 
el resultado que previamente ha dado una 
condición. Es decir, indicar que si el resulta- 
do que ha dado una condición es CIERTA, rea- 
lizar una acción y si el resultado ha sido FAL- 
SO, realizar otra. 


Las órdenes que nos permiten esto son: 


SIC 
y 
SIP 
abreviaturas respectivamente de: 
SI Cierto 
SI Falso 


La forma de expresarlas es: 


SIC [Acción 1] 
SIF [Acción 2] 


Observa que en este caso no se estable- 
ce la condición, sino que se investiga sobre el 
resultado que ha devuelto la condición. Pero, 
y la condición, ¿dónde está expresada? 

Para solucionar esto, conozcamos otra 
nueva orden Logo. 

Si utilizamos las órdenes SIC y SIF, te- 
nemos que saber previamente el resultado 
que ha devuelto la condición con la que esta- 
mos trabajando. Para ello utilizamos la orden: 


COMPRUEBA condición 


Esta orden determina si la condición es- 
tablecida es cierta o falsa para utilizarla pos- 
teriormente con SIC o SIF. 

Así pues, la orden SIC ejecutará las ór- 
denes que se especifican en la primera ac- 
ción, si el resultado del último COMPRUEBA 
es cierto, no haciendo nada en el caso contra- 
rio, y SIF ejecutará las órdenes que se espe- 
cifican en la segunda acción, si el resultado 
del último COMPRUEBA ha sido falso, no rea- 
lizando acción alguna en caso contrario. 

La orden COMPRUEBA, sólo tendrá ac- 
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ción dentro del procedimiento donde se en- 
cuentra, 

La forma general de expresar esta nue- 
va forma de condicionales es: 


? COMPRUEBA condición 
? SIC [Acción 1] 
?  SIF [Acción 2] 


El siguiente ejemplo nos demuestra la 
forma de utilizar correctamente todo lo que 
hemos visto. 


— Supongamos que dependiendo del 
valor que tome una variable aleatoriamente 
entre 0 y 1, la Tortuga tiene que mostrarse u 
ocultarse. Si el valor de la variable es cero, la 
Tortuga se mostrará, y si es uno, se ocultará. 


? PARA EJEMPLO 

> HAZ "V AZAR 2 

> COMPRUEBA :V =0 
> SIC [ MT ] 

> SIF [OT] 

> FIN 


Asignamos a la variable :V un valor 
aleatorio entre 0 y 1. Comprueba si el valor de 
V es igual a cero. Si lo es, obtenemos como re- 
sultado CIERTO, y si no lo es, FALSO. En el 
caso de que no sea cero, a la fuerza tendrá 
que ser uno. 

A continuación, ordenamos que si el re- 
sultado de la condición es CIERTO, la Tortuga 
se muestre (MT), y si el resultado es FALSO, 
la Tortuga se OCULTE (OT). 

También podíamos haber definido el 
procedimiento de la siguiente forma: 


? PARA EJEMPLO 
> HAZ "V AZAR 2 
> SI:V20[MT][OT] 
* > FIN 


Las órdenes COMPRUEBA, SIC y SIF no 
existen en todas las versiones de Logo. Sí dis- 
ponen de ellas las versiones de los MSX y de 
los PC-COMPATIBLES. 


La recursividad 


Una de las grandes posibilidades del 
Logo es la recursividad en los procedimientos 


y consiste en que un procedimiento se llame 
a sí mismo. 

Introduce el procedimiento ESTRELLA 
en tu ordenador y asómbrate. 


? PARA ESTRELLA 

> MT 

> REPITE 6 [ AV 20 GD 100 AV 20 GI 
40] 

> ESTRELLA 

> FIN 


Para ejecutarlo teclea: 
? ESTRELLA 


¡CUIDADO!, antes debes saber que este 
procedimiento mantendrá a la Tortuga dibu- 
jando estrellas eternamente, excepto que lo 
detengas manualmente interrumpiendo la eje- 
cución. 

Según el ordenador con el que estés 
trabajando, la tecla o teclas a pulsar para de- 
tener la ejecución son: 


En el SPECTRUM 
CAPS y BREAK/SPACE simultáneamen- 


En los MSX 
CTRL y STOP simultáneamente. 


En los PC-compatibles 
F10 o CRTL y G simultáneamente. 


Vemos que dentro del procedimiento 
que acabamos de definir una de las órdenes 
es una llamada a un procedimiento, y ese pro- 
cedimiento al que se llama no es otro que el 
que se está ejecutando. 


Cuando la ejecución del procedimiento 
llegue a esa orden de llamada, el procedi- 
miento que se está ejecutando se volverá a 
ejecutar. 

Este tipo de recursividad en el que la 
llamada recursiva se encuentra al final del 
procedimiento, suele denominarse recursivi- 
dad de cola, y serán de este tipo todos los 
ejemplos que iremos viendo a lo largo de este 
tomo. 

Otro ejemplo similar al anterior es el si- 
guiente: 


? PARA CUADRADO 

> REPITE 4[ AV 40 GD 90 ] 
> CUADRADO 

> FIN 


Si lo ejecutas, en la pantalla de tu orde- 
nador se irán dibujando infinitos cuadrados 
unos encima de otros. 


? CUADRADO 


Recuerda que cuando te canses de ver 
a la Tortuga dibujando cuadrados, puedes de- 
tener la ejecución manualmente. 

Variando un poco el procedimiento an- 
terior, podemos conseguir que no se dibujen 
todos los cuadrados en la misma posición. 


PARA CUADRADO 

BL 

REPITE 4[ AV 30 GD 90 ] 
SL 


PONY (AZAR 200) - 100 
PONX (AZAR 200) - 100 
CUADRADO 

FIN 


Lo que hemos hecho ha sido determi- 
nar, aleatoriamente, la posición donde se di- 
bujará cada uno de los cuadrados. 


? CUADRADO 


VVUVVVVV> 


Con la recursividad simplificamos enor- 
memente los procedimientos y obtenemos fá- 
cilmente pantallas como la siguiente. 


? PARA CURVA 

> PONRUMBO 170 

> AV 50 

> REPITE 18[ AV3GD 10] 
> CURVA 

> FIN 


Dependiendo del tiempo que esté eje- 
cutándose el procedimiento CURVA, el dibujo 
de la pantalla cambiará. 


Recursividad en procedimientos con 
una entrada 


Hasta ahora hemos visto cómo ejecutar 
infinitas veces un procedimiento sin entradas 
desde el mismo procedimiento, hagamos lo 
mismo pero con procedimientos con una en- 
trada. 

El siguiente procedimiento dibuja un 
círculo cuyo tamaño se determina con un dato 
de entrada: 


? PARA CIRCULO :T 
> REPITE 36[ AV:TGD10] 
> FIN 


Ahora cogemos este procedimiento y le 
añadimos una llamada recursiva: 


? PARA CIRCULO :T 

> MT 

> REPITE 36 [ AV :T GD 10] 
> CIRCULO :T 

> FIN 


Si ejecutamos este último procedimiento. 
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? CIRCULO 3 


veremos cómo la Tortuga va dibujando círcu- 
los del mismo tamaño. 

Y los dibuja del mismo tamaño porque 
en la llamada recursiva no hemos variado el 
dato de entrada del procedimiento CIRCULO. 

Veamos lo que ocurre si incrementa- 
mos el dato de entrada: 


? PARA CIRCULO :T 
> MT 

> REPITE 36[ AV :T GD 10] 
> CIRCULO :T + 1 

> FIN 


Ejecutamos el procedimiento indicando 
un tamaño inicial igual que en el procedimien- 
to anterior. 


? CIRCULO 3 


Hasta que detengamos la ejecución, la 
Tortuga dibujará círculos de diferentes tama- 
ños. 

A continuación ejecutaremos un mismo 
dibujo a través de dos procesos distintos. 

Este será el dibujo a realizar: 


— Primero lo realizamos sin utilizar 
procedimientos recursivos. 


El procedimiento ESTRE de una entra- 
da dibuja una estrella cuyo lado está determi- 
nado por el valor de la variable L. 


? PARA ESTRE :L 

> PONRUMBO 180 

> REPITE T[ AV :L GD 100 AV :L GI 
40 ] 

> FIN 


Para ejecutar varias veces el procedi- 
miento ESTRE, definimos este otro procedi- 
miento (ESTRELLA) que inicializa la pantalla y 
llama 50 veces al procedimiento ESTRE, incre- 
mentando (a través de la variable C) cada vez 
el lado de la estrella en una unidad. 


PARA ESTRELLA 

BP 

SL 

PONPOS [ 30 -15 ] 

BL 

HAZ 'C 1 

REPITE 50 [ ESTRE :C HAZ 'C:C +1] 
FIN 


INNVNYN VNS 


— Ahora realizamos el mismo dibujo 
utilizando un procedimiento recursivo. 


? PARA ESTRE :L 

== 8b 

> PONPOS [ 30 -15 ] 

> BL 

> PONRUMBO 180 

> REPITE 6 [ AV :L GD 100 AV :L Cl 40] 
> ESTRE :L + 1 

> FIN 


La principal novedad de este procedi- 
miento es que realizamos una llamada recur- 
siva a un procedimiento con una entrada, y 
que cada vez que realizamos la llamada, va- 
riamos el valor del dato que le pasamos al pro- 
cedimiento. 

Cuando ejecutamos el procedimiento 
ESTRE determinamos el valor inicial de la va- 
riable L, 


Por ejemplo: 
? ESTRE 1 
y obtenemos el dibujo mostrado anteriormente. 


2 


También podemos obtener otros dibu- 2. Utilizando un procedimiento recursivo, di- 
jos parecidos. buja cubos de distintos tamaños y en la mis- 


ma posición. 
? ESTRE 20 3. Intenta realizar los siguientes dibujos: 


2 Cuadro resumen 


— COMPRUEBA condición 

Determina si la condición que se espe- 
cifica es CIERTO o FAESO para utilizarlo pos- 
teriormente con SIC y SIF, 


= SIC [ acción ] 

Se ejecuta la acción que se especifica 
si el resultado del último COMPRUEBA ha sido 
CIERTO. 


— SIF [ acción ] 

Se ejecuta la acción que se especifica 
si el resultado del último COMPRUEBA ha sido 
FALSO. 


== Ejercicios 
1. Define un procedimiento recursivo que 
realice el siguiente dibujo: 


4. Intenta definir los procedimientos necesa- 
rios para poder jugar a las tres en raya con 
un amigo tuyo. 

Un tablero que puede servir para jugar es: 
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J 


Solución a los ejercicios 
1: 


El procedimiento CURVA dibuja infinitas ve- 
ces el siguiente dibujo: 


3. ¿Son correctas las órdenes siguientes? 


— ? PARA LINEA :C 
> CENTRO 
> HAZ'C:C +10 
> AV:C 
A o La causa de que este dibujo no se realice 
siempre en la misma posición es la orden 
— ? PARA TOR REPITE 18[ AV 4 GD 10] 
sl e “C 20 pues al A su ejecución de iba E se 
encuentra en el mismo punto de la coordena- 
S A O Pe da Y que se encontraba al principio. 
> TOR ? PARA CURVA 
> FIN > SL 
> PONX -50 
— ? PARA CUADRADO :L > BL 
> HAZ '*C 20 > PONRUMBO 90 
> REPITE 4[ AV:C GD90] > AV35 
> CUADRADO :L + 3 > GI90 
> FIN > REPITE 18[ AV 4GD10] 
> GI90 
=P HAZ V 5 > AV 35 
> COMPRUEBA :V = 5 > CURVA 
> SIC[AV:V][ ALTO ] > FIN 
— ? PARA A:X 2: 
> COMPRUEBA :X > 10 d 
> SIF[ ALTO ] CUBO es un procedimiento de una entrada 
> AV:X que dibuja un cubo cuyas dimensiones están 
> FIN determinadas por la variable de entrada L. 
En el mismo procedimiento y después 
— ? PARA A :X de dibujar un cubo, una llamada recursiva 
> SIC[ AV:X] provoca que el procedimiento vuelva a ejecu- 
> SIF[RE:X] tarse, incrementando, en la llamada, el valor 
> FIN de la arista del cubo 10 puntos. 
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PARA CUBO :L 
SL 

CENTRO 

PONX -—:L / 2 
PONY —:L / 2 

BL 

REPITE 4[ AV :LGD 90 ] 
AV :L 

GD 45 
AV:L-(:L/3) 
GD 45 

REPITE 4[ AV:LGD 90] 
AV :L 

GD 90 

AV :L 

GD 45 

AV :L-(:L/3) 
GD 135 

AV :L 

GD 45 
AV:L-(:L/3) 
SL 

PONX —:L / 2 
PONY -:1/2 ' 
BL 
AV:L-(:L/3) 
CUBO :L + 10 
FIN 


VVVVVVVVVVVVVVVVVVVVVVVVVVV"” 


La llamada recursiva es: 


CUBO :L + 10 


Cuando ejecutamos el procedimiento 
CUBO determinamos el valor inicial de la aris- 
ta, ese valor se almacena en la variable L, a 
partir de ese valor se irán dibujando cubos de 
dimensión L + 10, es decir, el valor actual de 
la variable L más 10. 


La clave del procedimiento es que al 
realizar la llamada al dato indicado como en- 
trada se vuelve a almacenar en la variable L. 


Ejecutamos el procedimiento determi- 
nando que la arista del primer cubo que se di- 
buje sea 10. 


? CUBO 10 
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3: 


En primer lugar, vamos a definir los procedi- 
mientos que dibujan las paralelas. 

El procedimiento PARALELAS es el que 
inicializa el proceso y el que realiza las llama- 
das necesarias a los procedimientos que dibu- 
jan las distintas partes de que se componen 
unas barras paralelas: 


PARA PARALELAS 


PONPOS [ -40 15] 
BARRA 
SL 
PONPOS [ -35 -1 ] 
PATA 
SL 
PONPOS [35 -1 ] 
PATA 
SL 
PONPOS [ -25 14 ] 
PATA 
SL 
PONPOS [ 45 14 ] 
PATA 
FIN 
El procedimiento BARRA dibuja las 
barras horizontales: 
? PARA BARRA 
> PONRUMBO 90 
> REPITE 3 [ BL AV 100 SL RE 100 Gl 
90 AV1GDO90] 
> FIN 


VVWVVWVVVVVVVVVVVVVVVVV" 


¿pl dibuja las patas de sujeción 
las barras: 

? PARA PATA 

PON RUMBO 180 

REPITE 3 [BL AV 40 SL RE 40 GD 90 
AV 1 G190] 

BL 

PONRUMBO -90 

AVI1RE6 

FIN 


Para ejecutarlo: 
? PARALELAS 


> 
> 


VVVV 


A continuación definimos los procedi- 
mientos que van a dibujar los distintos elemen- 
tos necesarios para realizar el salto de altura. 

ALTURA es el que inicializa el proceso 
y llama a los procedimientos que dibujan los 
diferentes elementos: 


PARA ALTURA 
BP 

OT 

SL 

PONY -40 
COLCHONETA 
SL 

PONPOS [ 5 -50 ] 
PATA1 

SL 

PONPOS [ -42 -5 ] 
PATA] 

SL 

PONPOS [ -47 76 ] 
BARRA] 

FIN 


procedimiento que dibuja la colcho- 


BD VVVVVVVVVVVVVVV> 


neta es: 


PARA COLCHONETA 

BL 

REPITE 2 [ AV 25 GD 90 AV 100 GD 
90] 

GI 45 

REPITE 2 [ AV 50 GD 45 AV 25 GD 
135 ] 

GD 45 AV 25 GD 90 

REPITE 2 [ AV 100 Gl 135 AV 50 GI 
45] 

FIN 


OS EA 


TIs5 O o . 
y E y ed y i E, 
Ny - 
¿LALALA ER Lol . 


adecuada al 
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El que dibuja los soportes de la barra 
que marca la altura es: 


'.? PARAPATA1l 
BL 
PONRUMBO 0 
REPITE 3 [ AV 100 RE 100 GD 90 AV 
1 GI90] 

GD 90 AV 1 
REGAV2 

GI 90 AV 75 
GI 90 AV 4 

GI 135 AV 5 
FIN 


BARRA1 dibuja la barra que marca la 
altura: 


VVWVWVVV VVV> 


? PARA BARRA] 

> REPITE 2 [ BL AV 80 SL RE 80 GI 90 
AV1GD90] 

> FIN 


Para ejecutarlo: 
? ALTURA 


Por último, definimos los procedimien- 
tos para dibujar las anillas: 

El procedimiento ANILLAS, como en los 
demás casos, inicializa el dibujo y llama a los 
diferentes procedimientos: 


PARA ANILLAS 
A 


OT 
SL 

PONPOS [ 30 -60 ] 
PATA2 

SL 

PONPOS [ -30 -30 ] 
PATA2 

SL 

PONPOS [ 33 57 ] 
BARRA2 

SL 

PONPOS [ 10 70 ] 
ANILLA 

SL 

PONPOS [ -10 80 ] 
ANILLA 

FIN 


VVVWVWVVWVVVVVVVVVVVV”> 


Para dibujar las patas de sujeción y la 
barra horizontal, definimos: 


PARA PATA2 

BL 

PONRUMBO 0 

REPITE 3 [ AV 120 RE 120 GD 90 AV 
1 GI90] 

GD 90 AV1RE 6 

FIN 


PARA BARRAZ2 

PONRUMBO -62 

REPITE 3 [ BL AV 73 SL RE 73 GD 90 
AV1GI9] 

FIN 


Y finalmente definimos el procedimien- 
toque dibuja las anillas: 


? PARA ANILLA 

> BL 

> PONRUMBO 180 

> AV 40 GD 90 REPITE 18[ AV 2 Gl 20 


NES NONOYIER 


> 


] 
> FIN 
Para ejecutarlo: 
? ANILLAS ' 
4: 


Para jugar a las tres en raya lo primero que te- 
nemos que tener es un tablero: 


PARA TABLERO 

SL 

PONPOS [ -50 -50 ] 

REPITE 3 [ REPITE 3 [ CASILLA SL 
GD 90 AV 45 GI 90 ] SL AV 45 Gl 90 
AV 135 GD 90 ] 

SL 

PONPONS [ -40 -40 ] 

PONRUMBO 45 

LINEA] 

SL 

PONPOS [ 40 -40 ] 

PONRUMBO -45 

LINEA 1 

SL 

PONPOS [ -40 -48 ] 

PONRUMBO 90 

REPITE 2 [ REPITE 3 [ LINEAZ2 SL RE 
80 GI 90 AV 45 GD 90 ] SL PONPOS 
[ 45 -40 ] PONRUMBO 0 ] 

> FIN 


El procedimiento TABLERO realiza va- 
rias llamadas a diferentes procedimientos. CA- 


WNENER 


VVWVWVVVVVVVVV 
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SILLAS dibuja cuadrados que simulan las nue- 
ve casillas que dispone el tablero. 


? PARA CASILLA 

> BL 

> REPITE 4[ AV 10GD 90] 
> FIN 


Para dibujar las líneas inclinadas y las 
verticales y horizontales definimos respectiva- 
mente los procedimientos: 


PARA LINEA1 


BL 
AV 50 SL AV 13 


WAVE NE ESO 


Una vez que tenemos el tablero, vamos 
a asignar un número a cada una de las casillas: 


El procedimiento INICIO inicializa nue- 
ve variables a cero. Cada una de estas varia- 
bles corresponde a una casilla. Si la variable 
contiene un cero significará que la casilla no 
ha sido ocupada. 


? PARA INICIO 
> HAZ'A10 
> HAZ"A20 
> HAZ"A30 
> HAZ"A40 
> HAZ"AS0 
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> HAZ'A50 
> HAZ"A60 
> HAZ 'A70 
> HAZ"A80 
> HAZ "A90 
> FIN 


El siguiente procedimiento es el que se 
encarga :de leer una tecla pulsada. Realiza 
dos lecturas del teclado, una para cada juga- 
dor y a cada uno le asigna un color diferente. 


? PARA JUGADA 
> HAZ "T TECLEAR 
> PONCL 15 

> JUEGO 

> HAZ "T LEECAR 
> PONCL 1 

> JUEGO 

> FIN 


Después de leer la tecla que se ha pul- 
sado y asignarla a la variable :T, se realiza una 
llamada al procedimiento JUEGO, que es el 
que va a investigar sobre cuál es ésta. Depen- 
diendo de cuál sea, se actúa de diferentes for- 
mas. 


? PARA JUEGO 

> Sh 

> SY(T=1CAl=0)[ HAZ 'Al 1 
PONPOS [ -45 45 ] MARCA ALTO ] 

> SIY (T=2)(A2 = 0) [ HAZ "A2 1 
PONPOS [ 0 45 ] MARCA ALTO ] 

> SIY (T=3)((A3=0)[ HAZ '"A3 1 
PONPOS [ 45 45 ] MARCA ALTO ] 

> SIY (T = 4) (A4 = 0) [ HAZ "A4 1 
PONPOS [ -45 0] MARCA ALTO ] 

> SIY(T=5)(A5=0)[ HAZ “A5 1 
PONPOS [ 00] MARCA ALTO ] 

> SI Y (T = 6) (A6 = 0) [ HAZ “A6 1 

: PONPOS [ 45 0] MARCA ALTO ] 

> SIY (T=7) (A7 =0)[ HAZ “A7 1 
PONPOS [ -45 -45 ] MARCA ALTO ] 

> SI Y (T = 8) (:A8 = 0) [ HAZ “A8 1 
PONPOS [ 0 -45 ] MARCA ALTO ] 

> SIY (T = 9) (:A9 = 0) [ HAZ “A9 1 
PONPOS [ 45 -48 ] MARCA ALTO ] 

> FIN 

? PARA MARCA 

> BL 

> RELLENA 

> FIN 
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En este procedimiento se va preguntan- 
do si el valor que contiene la variable :T es 
igual a uno de los números del 0 al 9. A su vez 
se pregunta también que si la variable que tie- 
ne asignada la casilla correspondiente al nú- 
mero pulsado es igual a cero. Si esta variable 
es cero, significará que la casilla está libre y, 
por tanto, la condición se cumple realizándo- 
se la acción que se expresa. 

La acción que hay que realizar en todos 
los casos es, en primer lugar, asignar un uno 
a la variable correspondiente a la casilla ele- 
gida, para detectar de alguna forma que ya ha 
sido utilizada. A continuación se sitúa la Tor- 
tuga en el punto que corresponde a la casilla 
que se ha pulsado. Una vez que está situada, 
llamamos al procedimiento MARCA que relle- 
na la casilla de un color. Por último, ordena- 
mos con ALTO que se devuelva el control al 
procedimiento anterior. 

Si la variable asignada a cada casilla es 
uno, significa que ya está ocupada y, por tan- 
to, la condición no se cumple y no se volverá 
a rellenar aunque sea elegida de nuevo. De 
esta forma evitamos que la misma casilla sea 
ocupada más de una vez dentro de la misma 
jugada. 

Una vez que tenemos todos los procedi- 
mientos necesarios, los agrupamos en uno ge- 
neral. 


? PARA S3R 

> BP 

> OT 

> TABLERO 

INICIO 

REPITE 5 [ JUGADA ] 
FIN 


Vamos a ejecutarlo: 
? 3R 


En primer lugar, en la pantalla aparece 
el tablero dibujado. A continuación el ordena- 
dor espera a que una tecla sea pulsada. 

Es el turno de que el primer jugador 
pulse la tecla correspondiente a la casilla que 
desee pulsar. Debes pulsar una tecla entre el 
0 y el 9. Una vez pulsada la casilla correspon- 
diente se rellenará de un color. 

A continuación, el segundo jugador de- 
berá realizar el mismo proceso y la casilla ele- 


=5 
> 
> 


gida se rellenará de un color diferente al de 
su compañero. 

Ten cuidado y no intentes ocupar una 
casilla que ya lo esté, ya que ésta no se relle- 
nará y tu turno se saltará. 

Cada jugador dispone de cinco oportu- 
nidades y cada vez que se desee volver a ju- 
gar, basta con ejecutar el procedimiento 3R. 


5: 


— ? PARA LINEA :C 
> CENTRO 
> HAZ'"C:C +10 
> AV:C 
> LINEA 
> FIN 


INCORRECTO 


Si ejecutamos este procedimiento, la 
Tortuga dibujará una línea en la pantalla y lue- 
go aparecerá el mensaje de error: 


FALTAN DATOS PARA LINEA: 


Observa que cuando realizamos la lla- 
mada recursiva no determinamos ningún pa- 
rámetro de entrada, y el procedimiento LINEA 
es un procedimiento con una entrada. 


— ? PARA TOR 

ES 
HAZ “C 20 
PONRUMBO AZAR 360 
AV:C 
TOR 
> FIN 


CORRECTO 


> 
> 
> 
> 


El procedimiento TOR hace dar tumbos 
a la Tortuga por toda la pantalla. 


— ? PARA CUADRADO : 
> HAZ '"C 20 
> REPITE 4[ AV:C GD 90] 
> CUADRADO :L + 3 
> FIN 


CORRECTO 
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En este procedimiento no hay ningún 
error para el Logo, pero si analizamos el con- 
junto de órdenes, vemos que si lo que se pre- 
tendía era dibujar cuadrados de tamaño fijo, 
no es necesario utilizar un procedimiento de 
una entrada: si, en cambio, se pretendía dibu- 
jar cuadrados de distintos tamaños, no tiene 
sentido incluir la segunda orden del procedi- 
miento y en la tercera orden debería apare- 
cer la variable L en lugar de la C. 


—? HAZ"V5 
? COMPRUEBA :V = 5 
? SIC[AV:V][ ALTO] 


INCORRECTO 


En la orden SIC sólo se puede expresar 
una acción a tomar. 


— ? PARAA:X 
> COMPRUEBA :X > 10 
> SIFP[ ALTO ] 
> AV:X 
> FIN 


CORRECTO 


Al ejecutar el procedimiento introduci- 
mos el valor a la variable X. Comprobamos si 
el valor introducido es mayor -que diez. Si lo 
es, no se ejecuta la línea donde aparece el SIF 
(ya que la condición devuelve el resultado 
CIERTO) y pasa a la línea siguiente. La Tortu- 
ga avanza los pasos que le indica X y acabará 
el procedimiento. Si el valor de X es menor de 
diez, el procedimiento se detendrá, ya que la 
condición devuelve el resultado FALSO y se 
ejecutará la acción que acompaña al SIF. 


— ? PARAA:X 
> SIC[ AV:X] 
> SIF[RE:X] 
> FIN 


INCORRECTO 


Para utilizar la orden SIC y SIF es nece- 
sario que previamente exista un COMPRUE- 
BA. 


MANEJO DE SPRITES Y ELEMENTOS GRAFICOS 


N el tomo anterior vimos dos 
de los tres tipos de tablas 
que había. El primero *de 
ellos, que estuvo incluido en 
el programa GUSANO 
LOCO, lo explicamos, pero 
el segundo no, por falta de 
espacio. Lo primero que ve- 
remos en este nuevo tomo será el funciona- 
miento de dicho programa. Después veremos 
otra rutina que nos mostrará la tercera y más 
perfeccionada forma de realizar tablas de RE- 
CORDS. 

Comencemos con el programa 2 del 
tomo anterior; su explicación línea a línea es 
la siguiente: 

Como puede apreciarse a primera vis- 
ta, las líneas de esta rutina van de cinco en cin- 
co en vez de ir de diez en diez. Esto es así por- 
que si hubiésemos renumerado el programa 
de diez en diez, al intentar incluirlo en el pro- 
grama GUSANO LOCO, los números de línea 
hubiesen sido mayores de los permitidos al fi- 
nal de la rutina y se hubiesen comido la parte 
del programa que nos avisaba del final del 
juego. 


Líneas 2475 y 2480. Se realiza un bucle 
de retardo. Este bucle, al igual que en el pro- 
grama anterior, no sirve para nada pero como 
hemos sacado esta rutina del programa GUSA- 
NO LOCO y como cabe la posibilidad de in- 
cluir esta nueva rutina en dicho programa, se 
han incluido estas dos líneas para guardar la 
compatibilidad entre la rutina y el programá. 
Por supuesto, si el usuario quiere utilizar esta 
rutina en sus propios programas, puede qui- 
tar libremente estas dos líneas. 


El grupo de líneas que vienen a conti- 
nuación y que van'desde la 2485 a la 2520 se 
encargan de dibujarnos en pantalla el rectán- 
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gulo dentro del cual aparecerá la tabla de RE- 
CORDS. Esta parte del programa ya ha sido 
explicada en la rutina anterior. Lo único que 
tienen diferente las dos rutinas son los núme- 
ros de línea, pero en este caso no es impor- 
tante. : 

Entre las líneas 2525 y 2550 se comprue- 
ba que la puntuación del jugador merece es- 
tar entre las diez mejores; la incluimos en la ta- 
bla en caso de que así sea y ordenamos la ta- 
bla de mayor a menor. Esta parte del progra- 
ma también ha sido explicada. 

Las líneas 2555, 2560 y 2565 nos dicen 
en qué posición de la tabla ha quedado alma- 
cenado el nuevo RECORD (en el caso de que 
lo hubiese). 

Línea 2570. Si no ha habido nuevo RE- 
CORD, nos vamos a la línea 2600 para impri- 
mir la tabla de ganadores. 

Línea 2575. Hacemos que una cadena 
de tres asteriscos (***) se almacene en A$(PP). 
Esta es el elemento del vector A$0 donde al- 
macenaremos el nombre del jugador que aca- 
ba de conseguir un nuevo RECORD, 

Líneas 2580 a 2595. Imprimimos la ta- 
bla entera de RECORDS, incluido el del juga- 
dor (si lo ha conseguido). En este caso, cada 
nombre está compuesto de sólo tres letras. 
Cuando aparezca la puntuación del jugador, 
en el lugar del nombre aparecerán tres aste- 
riscos. En esta posición será donde el jugador 
tendrá que introducir las iniciales de su nom- 
bre. 

Línea 2600. Si no ha habido RECORD, 
como no tenemos que preguntar el nombre 
del jugador, nos saltamos las líneas encarga- 
das de hacerlo y nos vamos a la línea 2715 para 
imprimir el mensaje de PULSA UNA TECLA. 

Línea 2605. Colocamos el cursor al 
principio de los tres caracteres que formarán 
el nombre del jugador. 
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Línea 2610. Borramos los tres asteriscos 
que habíamos almacenado en A$(PP) para em- 
pezar con la recogida del nombre sin tener 
nada almacenado en esta variable. 

Línea 2615. Asignamos el valor dos (2) 
a la variable numérica C. Esta variable será la 
que almacene el carácter que se está impri- 
miendo en la pantalla en un cierto momento. 
Veremos más adelante cómo funciona y cómo 
la utilizamos. 


Línea 2620. Asignamos a la variable X 
el valor cero (0). Esta variable nos servirá para 
comprobar que el usuario ha pulsado la tecla 
de disparo para elegir la letra que está viendo. 

Línea 2625. Almacenamos en la varia- 
ble alfanumérica F$ todos los caracteres que 
el usuario podrá utilizar para introducir sus 
iniciales. 

Línea 2630. Como el nombre del juga- 
dor que ha conseguido un nuevo RECORD sólo 
puede tener tres caracteres como máximo, co- 
menzamos un bucle de tres vueltas cuya va- 
riable índice será la 1. 

Línea 2635. Colocamos el cursor de la 
letra de su nombre que le corresponda al ju- 
gador elegir para escribirlo, 

Línea 2640. E imprimimos la letra que 
en ese momento esté disponible. Dicha letra 
será una de las almacenadas en la variable Z$ 
y su posición dentro de la cadena vendrá dada 
por el valor de C. 

Línea 2645. Miramos a ver si el jugador 
ha pulsado alguna tecla. En caso negativo vol- 
vemos a preguntar hasta que lo haga. 

Línea 2650. Si la tecla pulsada es una P 
(mayúscula o minúscula), entonces hacemos 
que C se incremente en uno para, más ade- 
lante, imprimir, la siguiente letra de la lista. 

Línea 2655. Si lo que puso fue una «O» 
o una «o», entonces decrementamos en uno el 
valor de C para imprimir la letra anterior. 

Línea 2660. Si pulsó la tecla M mayús- 
cula o la M minúscula entonces significa que 
el usuario quiere fijar la letra que está visuali- 
zando en ese momento. En ese caso ponemos 
la variable X con valor menos uno (-1). Este va- 
lor nos dirá más adelante que dicha letra ha 
sido elegida. 

Línea 2665. Si no se pulsó ninguna de 
las letras que acabamos de ver, entonces nos 
volvemos a la línea 2645 para seguir pregun- 
tando hasta que se pulse una de las permiti- 
das. 

Línea 2670. Colocamos el cursor en la 
posición del nombre que corresponda y que 
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tiene relación directa con la letra que estamos 
editando y, por tanto, con el valor de la varia- 
ble índice del bucle. 

Línea 2675. Si la tecla que pulsó el ju- 
gador fue la de fuego, entonces nos vamos a 
la línea 2700 para procesar el almacenamien- 
to de dicha letra. 

Línea 2680. Si el valor de C es mayor 
que el de letras disponibles. Si el valor de C 
ha excedido del número de letras que tene- 
mos en la lista, entonces hacemos que tome 
valor uno (1). 


Línea 2685. Si, por el contrario, el valor 
de C es menor que cero, como nos estamos sa- 
liendo de la lista, pero por el otro extremo, ha- 
cemos que C sea igual al número máximo de 
letras en la lista para que, así, apunte a la úl- 
tima letra de ésta. 

Línea 2690. Imprimimos la letra que 
acaba de ser seleccionada. 

Línea 2695. Y nos volvemos a la línea 
2645 en espera de una nueva pulsación desde 
el teclado. 

Línea 2700. Aparecemos en esta línea 
cuando el usuario ha pulsado la tecla fuego. 
En ese caso tenemos que almacenar la letra 
que se estaba visualizando. La posición de di- 
cha letra en la cadena alfanumérica Z$ nos la 
da la variable C. Por ello, concatenamos el va- 
lor que tenga la variable A$(PP) con la letra 
que se encuentre en dicha posición. 

Línea 2705. Hacemos que X tenga va- 
lor cero de nuevo. 


Línea 2710. Y terminamos el bucle para 
continuar con la siguiente letra. 


Las líneas que vienen a continuación 
son iguales que las que vimos en el tomo an- 
terior al explicar el programa número uno. 

A continuación veremos un programa 
que nos servirá como referencia para conocer 
y aprender el tercer tipo de tabla de RE- 
CORDS que podemos realizar. Este nuevo tipo 
se caracteriza porque toda las letras disponi- 
bles están permanentemente en pantalla y nos 
movemos, con un cursor, de una a otra antes 
de elegir cuál es la que deseamos. 

Este programa sólo admite nombres de 
tres letras, pero puede ser ampliado sin mu- 
cha dificultad para que admita nombres de 
cualquier longitud, 

Otra particularidad de esta rutina es 
que podemos borrar el nombre, si nos hemos 
equivocado, y podemos poner fin a la impre- 
sión de nuestro nombre en cuanto queramos. 
Esto lo podemos realizar moviéndonos a la «E» 


minúscula que se encuentra en la última fila  «B»minúscula que se encuentra al lado de ésta 
de caracteres (en el caso de terminar) o ala  (en.el caso de que queramos borrar). 


2450 REM 

2455 REM ASS jolla lololoiololoiok 

2460 REM * TABLA DE GANADORES * 

2465 REM A Add9ddadSSoddiolo lolo olokook 

2470 REM 

2475 FOR I=1 TO 1000 

2480 NEXT 1 

2485 CLS 

2490 PRINT "PUNTUACIONES DE HOY" 

2495 PRINT 

OSO MERIN A A a Y 7 E 
2505 FOR I=4 TO 17 

2510 PRINT “!";TAB(20);"!" 

2515 NEXT 1 

SF DONPRIN TE > y 

2525 LET Z$="ABCDEFGHIJKLMNOPQRSTUVWXYZ ,.:;!?288%/8*()-=*<>[Jeb" 
2530 LET P=4 

2535 LOCATE P,25 

2540 FOR I=1 TO LEN(Z$) STEP 10 

2545 FOR J=1I TO 1+9 

2550 PRINT MID$(Z$,3,1); 

2555 NEXT J | 

2560  LET P=P+2 

2565 LOCATE P,25 

2570 NEXT 1 

2575 IF SC>=S(10) THEN LET S(10)=SC:LET A$(10)=CHR$(254) 
2580 FOR I=1 TO 10 

2585 FOR J=1 TO 1 

2590 IF S(J)<S(1I) THEN LET A=S(J):LET S(J)=S(1):LET S(1)=A:LET B$=A$(J):LE 
T AS(J)=A$(1):LET A$(1)=B$ 

2595 NEXT J 

2600 NEXT 1 

2605 FOR I=1 TO 10 

2610 IF A$(I)=CHR$(254) THEN LET PP=1I 

2615 NEXT 1 

2620 IF PP=0 THEN GOTO 2630 

2625 LET AS(PP)="xx*x*" 

2630 FOR I=1 TO 10 

2635  LOCATE 5+1,3 

2640  PRINT A$(I)5" ....";S(1) 

2645 NEXT 1 

2650 IF PP=0 THEN GOTO 2825 

26855 LET P=5 

2660 LET X=25 

2665 LET A$(PP)="" 

2670 FOR I=1 TO 3 

2675  |LOCATE P,X 

2680  PRINT “x" 

2685 LET B$=INKEYS$ 

2690 IF B$="" THEN GOTO 2685 

2695 IF B$="P" OR B$="p" THEN LET C=1:F=0:GOTO 2725 
2700 IF B$="0" OR B$="0" THEN LET C=-1:LET F=0:GOTO 2725 
2705 IF B$="Q" OR B$="q" THEN LET C=0:LET F=-1:GOTO 2725 
2710 IF B$="A" OR B$="a" THEN LET C=0:LET F=1:GOTO 2725 
2715 IF B$="M" OR B$="m" THEN LET C=0:LET F=0:GOTO 2725 
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NYBÓ GOTO 2005 


",3):LET I=3:GOTO 2 


IF MIDS(Z$,N,1)="b" AND 1>1 THEN LET I=1-2:LET A$(PP)=LEFTS(A$(PP),1):LO 


uns LOCATE P,X 

4790 PRINT “ " 

2705 1F' (50 AND F=0 THEN GOTO 2785 

10740 LET P=P+2x*F 

14745 LET X=X+*C 

27b0 LET C=0 

2755 LET F=0 

2760 IF P>13 THEN P=5 

2765 IF P<5 THEN LET P=13 

2770 IF X>34 THEN LET X=25:LET P=P+2:GOTO 2760 
2775 IF X<25 THEN LET X=34:LET P=P-2:GOTO 2760 
2780 GOTO 2675 

2785 LET N=((P-7)/2+1)x10+X-24 

2790 IF MID$(Z$,N,1)="e" THEN LET A$(PP)=LEFTS$(A$S(PP)+" 
810 

2795 

CATE 5+PP,3:PRINT "xx*x*":GOTO 2810 

2800 IF MID$(Z$,N,1)="b" THEN GOTO 2675 

2805 LET A$(PP)=AS(PP)+MID$(Z$,N, 1) 

2810 LOCATE 5+PP, 3 

2815 PRINT A$(PP) 

2820 NEXT 1 

2825 LOCATE 20,1 

2830 PRINT "<< PULSA UNA TECLA >> 

2835 LET B$=INKEY$ 


2840 
2845 
2850 


IF B$="" THEN GOTO 2835 
LOCATE 20,1 
GOTO 2330 


Como siempre, las modificaciones que 
hay que realizar para que el programa fucio- 
ne en ordenadores distintos del IBM y compa- 
tibles son las siguientes: 


COMMODORE: 


2845 PRINT CHR$(147) 

2510 PRINT “"¡;TAB(18);""" 

2535 POKE 214,P:POKE 211,24 

2565 POKE 214,P:POKE 211,24 

2635 POKE 214,4+1:POKE 211,2 

2660 LET X=24 ' 

2675 POKE 214,P:POKE 211,X 

2685 GET B$ 

27125 POKE 214,P:POKE 211,X : 

2770 IP X>33 THEN LET X=25:LET P=P+2:GOTO 2760 
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27175 IF X<24 THEN LET X=33:LET P=P-2:GOTO 2760 

27195 IF MID$(Z$,N,1)="b" AND 1>1 THEN LET I=1-2:LET 
A$(PP)=LEFTH)AS(PP),D:POKE 214,4+PP:POKE 
211,2:PRINT “"*":.GOTO 2810 

2810 POKE 214,4+PP:POKE 211,2 

2825 POKE 214,19:POKE 211,0 

2835 GET B$ 

2845 POKE 214,19:POKE 211,0 


SPECTRUM: 


2510 PRINT “"¡TAB(7);"" 

2835 PRINT AT P,20; 

2550 PRINT Z$(); 

2565 PRINT AT P,20; 

2635 PRINT AT 4+1,2; 

2660 LET X=20 

2675 PRINT AT PX; 

27125 PRINT AT P,X; 

2710 IF X>29 THEN LET X=20:LET P=P+2:GOTO 2760 

2175 IF X<20 THEN LET X=29:LET P=P-2:GOTO 2760 

2790 IF Z$(N)="e" RHEN LET A$(PP)=(A$(PP)+" DTO 
3):LET I=3:GOTO 2810 

27958 IF Z$(N)="b" AND 1>1 THEN LET I=1-2:LET 
AS$(PP)>=A$(PP, TO D:PRINT AT 4+PP,2;"*"":GOTO 
2810 


2800 IF Z$(N)="b" THEN GOTO 2675 
2805 LET A$(PP)=A$(PP)+Z$(N) 
2810 PRINT AT 4+PP,2; 

2825 PRINT AT 19,0; 

2845 PRINT AT 19,0; 


MSX y AMSTRAD: 


2535 LOCATE 25,P 
2565 LOCATE 25,P 
2635 LOCATE 3,5+1 
2675 LOCATE X,P 
2125 LOCATE X,P 


Este nuevo programa es muy parecido 
a los dos anteriores. También puede ser uni- 
do al programa GUSANO LOCO para poder 
ver mejor cómo funciona. Por supuesto, que el 


2795 IF MID$(Z$,N,1)="b" AND I>1 THEN LET 1=1-2:LET programa 3 que se dio en el tomo anterior nos 
A$ (PP)=LEFT$(A$(PP).D:LOCATE 3,5+PP:PRINT puede servir para ver cómo funciona. A con- 


"*"GOTO 2810 
2810 LOCATE 3,5+PP 
2825 LOCATE 1,20 
2845 LOCATE 1,20 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 


tinuación volvemos a transcribirlo para como- 
didad de los lectores. 


REM SS SlO lll jololojojoK 
REM * PROGRAMA DEMO PARA VER * 
REM * EL FUNCIONAMIENTO DE x 
REM * LA RUTINA DE RECORDS.  *x 
REM oSSSSSSIO Olalla: 
REM 
CLS 
DIM A$(10) 
DIM S(10) 
LET PP=0 
FOR I=1 TO 10 
READ A$(1),5(I) 
NEXT 1 
INPUT "QUE PUNTUACION QUIERES TENER ";SC 
GOSUB 2450 
CLS 
PRINT "FIN DE LA DEMOSTRACION” 
END 
REM 
REM RSS lola jolla lalalala lalola oK 
REM * DATAS CON NOMBRES Y PUNTUACIONES FICTICIAS * 
REM SISSI lalalala lalalala lalalala lok 
REM 
DATA "FMG", 12455 
DATA "JYH", 11022 
DATA "ABA”, 10344 
DATA “RIP",9800 
DATA "PUS",9780 
DATA "RES",9201 
DATA " A “,7200 
DATA "Z Z",6543 
DATA "ZIP", 3403 
DATA "ZAP"”, 2195 


Las únicas modificaciones que hay que 
realizar para que funcione en el SPECTRUM y 
en el COMMODORE, aunque ya aparecieron 
en el tomo anterior, son las siguientes: 


COMMODORE: 


160 PRINT CHR$(147) 
250 PRINT CHR$(147) 


SPECTRUM: 
170 DIM A$(10,3) 
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Veamos ahora cómo funciona la parte 
central de esta última rutina, El resto de las lí- 
neas no van a ser explicadas por su parecido 
a las de los dos programas anteriores. Así, 
pues, empezaremos a ver el programa a par- 
tir de la línea 2655: 


Línea 2655. Asignamos a la variable P 
el valor 5. Esta variable nos indicará en qué lí- 
nea, de las cinco que disponemos, se encuen- 
tra el cursor. 

Línea 2660. Almacenamos en X el valor 
de la columna donde empiezan las filas de le- 
tras. 

Línea 2665. Borramos el contenido de 
la variable A$(PP). 

Línea 2670. Comenzamos un bucle den- 
tro del cual vamos a leer las tres letras que el 
usuario quiere que definan su nombre. 

Línea 2675. Colocamos el cursor deba- 
jo del primer carácter y en la primera de las 
cinco líneas que contienen los caracteres que 
podemos definir, 

Línea 2680. Imprimimos un asterisco (*) 
para indicar en qué posición nos encontramos. 

Línea 2685. Miramos si el usuario ha 
pulsado alguna tecla. 

Línea 2690. Si el usuario no ha pulsado 
ninguna tecla, entonces volvemos a preguntar. 

Líneas 2695 a 2715. Comprobamos que 
el usuario ha pulsado alguna de las teclas per- 
mitidas. Según la tecla pulsada, variamos el 
valor de unas u otras variables. La variable C 
nos dice si hay que ir a la columna siguiente 
(1D) o a la anterior (-1). La variable F nos indica 
si tenemos que ir a la línea siguiente (1) o a la 
anterior (-1). Si hemos pulsado la tecla de dis- 
paro, ambas variables valen cero. 

Línea 2720. Si no pulsó ninguna de las 
teelas autorizadas, nos volvemos a la línea 
2685. 

Línea 2725. Colocamos el cursor en la 
posición donde estaba el asterisco. 
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Línea 2730. Y lo borramos. 

Línea 2735. Preguntamos si pulsó la te- 
cla de disparo. En caso afirmativo, nos vamos 
a la línea 2785. 

Línea 2740. Calculamos la nueva línea 
a la que tenemos que ir. 

Línea 2745. Y la nueva columna. 

Línea 2750. Ponemos la variable C a 
cero (0). 

Línea 2755. Y la variable F también a 
cero. 

Línea 2760. Si hemos llegado a la últi- 
ma línea, nos vamos a la primera. 

Línea 2765. Si hemos llegado a la últi- 
ma línea, nos vamos a la última. 

Línea 2770. Si hemos llegado al último 
carácter de una línea, nos vamos al principio 
de la siguiente. 

Línea 2775. Si hemos llegado al princi- 
pio de una línea, nos vamos al final de la ante- 
rior. 

Línea 2780. Nos volvemos a la línea 
2675 para dibujar el asterisco en su nueva po- 
sición. 

Línea 2785. Calculamos la posición 
dentro de Z$ del carácter sobre el que se en- 
cuentra el cursor-asterisco. 

Línea 2790. Si éste es el carácter «e», 
hemos terminado y nos vamos a la línea 2810. 

Línea 2795. Si este carácter es la «b» y 
ya habíamos introducido algún carácter, nos 
vamos a la línea 2810. 

Línea 2800. Si el carácter introducido 
era una «b», pero no habíamos introducido nin- 
guna letra anteriormente, nos vamos a la línea 
2675. 

Línea 2805. Almacenamos la letra ele- 
gida. 

Línea 2810. Colocamos el cursor en la 
posición donde corresponda. 

Línea 2815. E imprimimos la tecla alma- 
cenada. 

Línea 2820. Aquí termina el bucle. 
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OMO ya se encuentra cerca 
la hora en que tendremos 
que crear nuestro primer 
juego en serio dentro de la 
sección de MANEJO DE 
SPRITES Y ELEMENTOS 
GRAFICOS, vamos a ver en 
éste y en tomos sucesivos 
unos programas que nos permitirán definir 
nuestros propios caracteres gráficos. Vere- 
mos un programa para el SPECTRUM, otro 
para el COMMODORE, otro para el MSX y otro 
para el AMSTRAD. Para el IBM no incluiremos 
ninguno, ya que con este ordenador no se pue- 
den definir ni caracteres ni SPRITES. Aun así, 
más adelante, cuando lleguemos a los capítu- 
los que hablan de alta resolución, veremos 
cómo crear nuestras propias figuras en el IBM. 


Los programas que veremos en esta se- 
rie de tomos serán los siguientes: 


— Un diseñador de SPRITES para el 
MSX. 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 


DEF FN h(A)=INT (A/256) 
POKE 23658,8 

REM1987 AGB 

REM CREADOR DE UDG*S 
REM INICILIZACION 
CLEAR 63687 

LET DIRBAS=63688 

LET BANCO=0 


FOR g=0 TO 9 
LET t=8g*168+dirbas 
FOR i=0 TO 167 


NEXT i 
NEXT g 
GO SUB 3090 
RESTORE 330 


POKE T+i,PEEK (USR "a"+i) 


FOR I=USR "A" TO USR "B"+7 
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— Un diseñador de SPRITES y caracte- 
res para el COMMODORE. 

— Un diseñador de caracteres para el 
AMSTRAD. 

No explicaremos el funcionamiento de 
cada uno de estos programas debido a su ex- 
tensión. Se han pensado estos programas 
como herramienta de trabajo y no como ejem- 
plo para explicar una serie de conceptos o de 
formas de realizar una cierta idea o función 
con nuestro ordenador. Por ello, se puede de- 
cir que los programas que van a ir aparecien- 
do pueden ser considerados como profesiona- 
les, debido a su utilidad real y a su funciona- 
miento. 

El primer programa que vamos a ver 
corresponde a la versión para SPECTRUM del 
diseñador de caracteres. Ni qué decir tiene 
que estos programas no son versiones unos de 
otros, sino que cada uno de ellos ha sido rea- 
lizado especificamente para cada ordenador 
para poder sacar el mayor partido posible a 
cada uno de ellos. 


INK 0: PAPER 7: BORDER 7: CLS 
DEF FN 1(A)=A-256xINT (A/256) ó 


PRINT AT 11,2; FLASH 1;"POR FAVOR, ESPERE MEDIO MINUTO" 
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300 
910 
30 
y30 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
5580 
560 
570 
580 
590 
600 
610 
620 
630 
840 
650 
660 
670 
880 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 


READ A 

POKE 1,4 

NEXT 1 

DATA 0,126,66,66,66,66, 126,0,0,126,126,126,126,126,126,0 
CLS 

LET x1=0 

LET y1=0 

LET 1=32 

LET m$="Definicion” | 


GO SUB 2830 

LET x1=18 

LET 1=13 

LET y1=2 

LET m$="Pizarra" 
GO SUB 2830 

LET x1=3 

LET 1=9 

LET m$="Grafico”" 
GO SUB 2830 

LET y1=16 

LET x1=0 

LET 1-32 

LET m$="Opciones” 
GO SUB 2830 

DIM g$(8,8) 

DIM P$(8,9) 

FOR i=1 TO 8 
LET g$(1)="AAAAAAAA" 
NEXT i 

GO SUB 3130 

GO SUB 2980 
PLOT 143,144 
DRAW 73,0 

DRAW 0,-65 

DRAW -73,0 

DRAW 0,65 

GO SUB 3180 

GO SUB 3250 => 
LET c$="A" 

LET x=3 

LET y=4 

GO SUB 3310 

REM COMIENZO DEL BUCLE PRICIPAL 

PRINT AT Y,X;" ” 

PAUSE 12: IF INKEY$<>"" THEN PRINT AT Y,X;G$(Y-3,X-2): GO TO 770 

PRINT AT Y, X;G$(Y-3,X-2) : 

PAUSE 12 

LET A$=INKEYS$ 

IF As<"9 AND A$>"0" THEN 0 TO 840 

LET X=X+(A$="P" AND X<10)-(A$="0" AND X>3) 

LET Y=Y+(A$="A" AND Y<11)-(A$="Q" AND Y>4) 

IF A$<>" " THEN GO TO 730 


LET G$(Y-3,X-2)=("A" AND G$(Y-3,X-2)="A")+("B" AND G$(Y-3,X-2)="B") 
GO TO 730 F 

REM OPCIONES 

BEEP .1,24 

IF A$="1" THEN GO SUB 970: GO TO 940 


IF A$="2" THEN GO SUB 1050: GO TO 940 
IF A$="3" THEN GO SUB 1210: GO TO 940 
IF A$="4" THEN GO SUB 1270: GO TO 940 
1F A$="5" THEN GO SUB 1640: GO TO 940 
IF A$="6" THEN GO SUB 2090: GO TO 940 


IF A$="7" THEN GO SUB 2650: GO TO 940 

IF A$="8"” THEN GO SUB 2710 

INPUT "": PRINT 41;" 0,P,Q,A-Mover 1-8 Opciones" 
BEEP .1,24 
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960 
970 
980 
990 

1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 


GO TO 730 

REM CAMBIO DE BANCO 

INPUT “Seleccione banco (1-9) ";b 

IF b>9 OR b<0 THEN GO TO 3470 

LET BANCO=B 

LET DIRBAS=63688+168x*BANCO 

GO SUB 2980 

GO SUB 3180 

RETURN 

REM ASIGNA CARACTER 

INPUT "Caracter (A-U) 7? "; LINE b$ 

IF b$>"U" OR b$<"A" THEN GO TO 3470 
LET c$=-b$ 

GO SUB 3130 

FOR g=1 TO 8 

LET t=0 

LET T2=128 

FOR i=1 TO 8 

LET t=t+(T2 AND g$(8,1)="B") 

LET T2=T2/2 

NEXT i 

POKE USR C$+G-1,T 

NEXT g 

GO SUB 2980 

RETURN 

REM COPIA DE UN CARACTER A LA PARRILLA 
INPUT "Caracter (A-U) ? "; LINE b$ 

IF B$>"U" OR B$<"A" THEN GO TO 3470 
LET C$=B$ 

GO SUB 3310 

RETURN 

REM SAVE/LOAD 

INPUT "Save o Load ? (S/L) "; LINE b$ 
IF b$<>"S" AND b$<>"L" THEN GO TO 3470 
LET x1=0 

LET y1=16 

LET m$="Save" 

LET L=32 

IF b$="L" THEN LET m$="Load" 

GO SUB 3510 

GO SUB 2830 

INPUT "Nombre (Max.10 caracteres)" LINE n$ 
IF LEN n$>10 THEN GO TO 1550 

IF B$="L" THEN GO TO 1490 

REM SAVE 

IF N$="" THEN GO TO 1550 

SAVE N$CODE DIRBAS, 168 

INPUT "Desea verificar ? (S/N) "; LINE b$ 
IF b$="N" THEN GO TO 1570 

PRINT AT 17,0;"Ponga en marcha el cassette" 
PRINT AT 17,0; 

VERIFY n$CODE dirbas, 168 

GO TO 1570 

REM LOAD 

PRINT AT 17,0;"Ponga en marcha el cassette" 
LOAD n$CoODE dirbas, 168 

GO SUB 2980 

GO SUB 3180 

GO TO 1570 

REM ERROR EN EL NOMBRE 

GO SUB 3470 

GO SUB 3510 

LET X1=0 

LET Yi=16 

LET M$="Opciones” 

GO SUB 2830 
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GO SUB 3250 

RETURN 

REM EDICION DE LA PIZARRA E 
GO SUB 3510 

LET Xi=0 

LET Y1=16 

LET M$="Edicion de pizarra" 

LET 1=32 

GO SUB 2830 

PRINT AT 18,0;"5,6,7,8-Movimiento del cursor. "*"SPACE-Borra el caracter." 
PRINT AT 20,0;"A-U-Poner caracter en la pizarra" 
PRINT AT 21,0;"ENTER-Finaliza edicion. " 

LET X2=18 

LET Y2=4 

REM BUCLE DE LA EDICION DE PIZARRA 

FOR I=1 TO 8 

FOR G=1 TO 9 

LET B$=P$(1,G) 

IF B$<>" " THEN LET B$=CHR$ (CODE B$-79) 

LET P$(1,G)=B$ 

NEXT G 

NEXT 1 

GO SUB 3180 

BEEP .1,24 

PRINT AT Y2,X2; PAPER 2;"” ” 

PAUSE 10 

IF INKEY$<>"" THEN PRINT AT Y2,X2;P$(Y2-3,X2-17): GO TO 1910 
PRINT AT Y2,X2;P$(Y2-3,X2-17) 

PAUSE 10 

LET A$=INKEY$ 

IF A$=CHR$ 13 THEN GO TO 1980 

LET X2=X2+(A$="8” AND X2<26)-(A$="5" AND X2>18) 
LET Y2=Y2+(A$="6" AND Y2<11)-(A3="7" AND Y2>4) 

IF A$<>" " AND (A$<"A”" OR A$>"U") THEN GO TO 1860 
LET P$(Y2-3,X2-17)=A$ 

GO TO 1860 

REM SALIDA DE LA OPCION 5 

BEEP .1,24 

FOR I=1 TO 8 

FOR G=1 TO 9 

LET B$-=-P$(1,G) 

IF B$<>" " THEN LET B$=CHR$ (CODE B$+79) 

LET P$(1,G)=B$ p 
NEXT G eS 
NEXT 1 

GO SUB 3180 

GO TO 1570 

REM OPERACIONES EXTRA 

GO SUB 3510 

LET X1=0 

LET Y1=16 

LET L=32 

LET M$="Opciones extra" 

GO SUB 2830 


PRINT AT 18,0;"1-Volver al menu4-Espejo horiz. "*"2-Invertir. ","5-Rotar izq. 


PRINT AT 20,0;"3-Espejo vert.","S5-Rotar derecha. " 
LET a$=INKEYS$S 

IF A$>"6” OR A$<"1" THEN GO TO 2180 

BEEP .1,24 

IF a$="1"” THEN GO TO 1570 

IF a$="2" THEN GO SUB 2300 

IF a$="3" THEN GO SUB 2380 

IF a$="4" THEN GO SUB 2450 

IF a$="5" THEN GO SUB 2540 

IF a$="6" THEN GO SUB 2590 
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2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 


12470 
/ 2480 
/ 2490 


2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 


BEEP .1,24 

GO SUB 2920 

GO TO 2180 

REM INVERSION DE CARACTER 
FOR I=1 TO 8 

FOR G=1 TO 8 

IF G$(1,G)="A" THEN LET G$(1,G)="B": GO TO 2350 
LET G$(1,G)="A"- 

NEXT G 

NEXT 1 

RETURN 

REM ESPEJO VERTICAL 
FOR I=1 TO 4 

LET B$=G$(1) 

LET G$(1)=G$(9-1) 

LET G$(9-1)=B$ 

NEXT 1 

RETURN 

REM ESPEJO HORIZONTAL 
FOR G=1 TO 8 

FOR I=1 TO 4 

LET B$=G$(G, 1) 


LET G$(G, 1)=G$(G, 9-1) 
LET G$(G, 9-1)=B$ 
NEXT I 

NEXT .G 

RETURN 

REM ROTAR IZQUIERDA 


FOR I=1 TO 8 

LET G$(1)=G$(1,2 TO )+G$(1,1) 
NEXT I 

RETURN 

REM ROTAR DERECHA 

FOR I=1 TO 8 

LET G$(1)=G$(1,8)+G$(1, TO 7) 
NEXT 1 . 

RETURN 

STOP 

REM BORRADO DE LA PARRILLA 
FOR I=1 TO 8 

LET G$(1)="AAAAAAAA" 

NEXT I 

GO SUB 2920 

RETURN ; 

REM VUELTA A BASIC 

GO SUB 3510 í 

LET X1=0 

LET Yi=16 

LET L=32 

LET M$="Prodgrama abandonado” 
GO SUB 2830 

PRINT AT 18,0;"Para volver al programa, teclear CONTINUE” 
STOP 

GO TO 1570 

LET X=5: LET Y=5 

RETURN 

REM coloca el encabezamiento 
FOR i=175-y1x8 TO 175-y1*8-7 STEP -2 
PLOT x1x*x8, i 

DRAW 1x8-1,0 

NEXT i 

INVERSE 1 

PRINT AT y1,x1+INT ((1-LEN m3) /2);m$ 
INVERSE O 

RETURN 

REM escribe parrilla 
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2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
3010 
Ed 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 
3370 
3380 
3390. 
3400 
3410 
3420 
3430 
3440 
3450 
3460 
3470 
3480 
3490 
3500 
3510 
3520 
3530 
3540 
3550 
3560 


REM 

FOR g=4 TO 11 

PRINT AT £,3;g$(8-3) 

NEXT g 

RETURN 

REM PRINT BANCO 

REM el que se esta trabajando 

GO SUB 3130 

PRINT AT 13,0;"Banco :"; INVERSE 1;banco; INVERSE 0;"”: ABCDEFGHIJKLMNOPQRST 


PRINT AT 14,10; 

FOR i=144 TO 164 

PRINT CHR$ i; 

NEXT i 

GO SUB 3180 

GO SUB 3090 

RETURN 

REM COLOCA EL SET NORMAL 
POKE 23675,88 

POKE 23676,255 

RETURN 

REM COLOCA EL SET MARCADO 
REM POR DIRBAS 

POKE 23675,FN L(DIRBAS) 
POKE 23676,FN H(DIRBAS) 
RETURN 

REM SACA PIZARRA 

GO SUB 3130 

FOR I=1 TO 8 

PRINT AT 4+1-1,18;P$(1) 
NEXT I 

GO SUB 3090 

RETURN 

REM SACA LA PANTALLA DEL MENU 
PRINT AT 18,0;"1-Cambia banco. ", "5-Edita pizarra. 2-Set UDG.", "6-Extras. " 
PRINT AT 20,0;"3-Copia.","7-Borra.","4-Save/Load.","8-Basic. ” 

INPUT "” 

PRINT $1;" 0,P,Q,A-Mover 1-8 Opciones" 

RETURN / 
REM COPIA DEL UDG A LA PARRILLA / 

GO SUB 313u 
DIM G$(8,8) 
FOR G=1 TO 8 N 
LET T=PEEK (USR C$+G-1) 

LET T2-128 

FOR I=1 TO 8 

LET e$(g,i)="A" 

LET T3=T-T2 

IF T3>=0 THEN LET T=T3: LET g$(8,1)="B" 

LET T2=T2/2 

NEXT I 

NEXT G 

GO SUB 3090 

GO SUB 2920 

RETURN 

REM ERROR EN UNA ENTRADA 

BEEP 1,0: PRINT $*1;TAB 7; FLASH 1;"ERROR:OPCION ANULADA" 
PAUSE 200 

RETURN 

REM BORRADO DE LA PARTE DESTINADA All MENU 

FOR I=16 TO 21 

PRINT AT 1,0;" 

NEXT I 

INPUT "" 

RETURN 


y 
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Antes de ver cómo podemos utilizar el 
programa, y qué opciones tiene, vamos a ex- 
plicar su utilidad y para qué nos puede servir. 

El programa DISENADOR DE CARAC- 
TERES PARA SPECTRUM está pensado como 
una herramienta que nos permitirá definir 
nuestros propios caracteres sin necesitar de 
un papel ni de un lápiz. Gracias a este progra- 
ma podremos crear todos los caracteres que 
queramos y almacenarlos en cinta para su use 
posterior. Es más, gracias a su sencillez, no te- 
nemos por qué saber cómo se definen los ca- 
racteres de SPECTRUM, ya que nosotros sólo 
tenemos que encargarnos de dibujarlos en la 
pantalla. 

Antes de introducir el programa hay 
que decir que las letras que aparecen subra- 
yadas en el listado han de ser introducidas en 
modo GRAPHICS. Este modo de cursor se ca- 
racteriza porque nos permite incluir en el lis- 
tado los caracteres definibles por el usuario 
(UDG) y los caracteres semigráficos. Para ha- 
cer que el cursor pase al modo GRAPHICS sólo 
hay que pulsar las teclas CAPS-SHIFT y 9 a la 
vez. Una vez hecho esto, el cursor se volverá 
una G mayúscula parpadeante. En ese mo- 
mento podemos pulsar la tecla subrayada. En 
la pantalla nos puede aparecer cualquier cosa. 
Lo mismo podremos ver la tecla que hemos 
pulsado (esto pasa cuando dicho carácter no 
ha sido definido) que un marciano (en el caso 
de que lo hayamos definido anteriormente). 
Una vez tecleadas todas las letras subrayadas, 
para volver al modo normal del cursor sólo te- 
nemos que volver a pulsar a la vez las teclas 
CAPS-SHIFT y 9. 

Cuando ejecutamos el programa nos 
aparece un mensaje en la pantalla que nos 
dice que nos esperemos medio minuto. Una 
vez pasado ese tiempo (aproximadamente) 
nos aparecerá en la pantalla algo parecido a 
lo que podemos ver en la figura 1. 


Lo que vemos en esta pantalla es lo si- 
guiente: 

— Arriba, a la izquierda, vemos una 
cuadrícula que está en blanco. Esta cuadrícu- 
la la utilizaremos para dibujar nuestro nuevo 
carácter. En la figura 1 se ha dibujado un cua- 
drado a modo de ejemplo. Esta cuadrícula es 
muy importante, pues todo el programa se 
centra en ella y en lo que dentro de ella 
ocurra. 

— Arriba, a la derecha, nos encontra- 
mos con un cuadrado en blanco que tiene una 
etiqueta que dice PIZARRA. Eso es justamen- 
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te lo que es. En este cuadrado nosotros podre- 
mos dibujar lo que queramos utilizando los ca- 
racteres que hemos definido. Su utilidad estri- 
ba en que si queremos definir un gráfico que 
ocupe más de un carácter, como necesitamos 
saber cómo va quedando nuestro gráfico a ta- 
maño real, en esta pizarra podremos dibujarlo 
para verlo. 

— Debajo de estos dos cuadrados tene- 
mos dos líneas, las cuales nos informan del 
banco que estamos utilizando y de los carac- 
teres que hay en dicho banco. Un banco es una 
serie completa de caracteres que van desde 
la A hasta la U, todos ellos definibles, Como 
muchas veces necesitamos definir más de 21 
caracteres, el programa dispone de 9 bancos 
distintos para crear hasta 200 caracteres. Las 
dos líneas que están junto al mensaje de infor- 
mación del banco que estamos utilizando nos 
informan de la forma que tiene cada uno de 
los caracteres que estamos definiendo. La pri- 
mera fila nos dice la tecla que tendremos que 
pulsar para ver el carácter que se encuentra 
en la segunda fila. Al principio del programa, 
antes de haber definido ningún gráfico, las 
dos líneas coincidirán. 

— Las cuatro líneas siguientes forman 
un menú y nos dicen las posibles opciones que 
tenemos y que podemos utilizar. Estas serán 
explicadas con más detalle un poco más ade- 
lante. 

— La última línea de la pantalla nos 
dice las teclas que podemos utilizar para mo- 
ver un pequeño cursor parpadeante que apa- 
recerá dentro de la parrilla superior y que nos 
servirá para dibujar el gráfico. Estas teclas 
son: 

O - Izquierda 

P - Derecha 

O - Arriba 

A - Abajo 

ESPACIO - Fijar o borrar un punto se- 
gún sea su estado. 
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Veamos ahora qué funciones podemos 
roaligzar con el programa aparte de dibujar 
nuéntro gráfico en la parrilla, Para saberlo y 
para utilizarlas tenemos un menú de ocho op- 
ciones, cuyo significado es: 


l, Nos permite cambiar el banco de 
caracteres con el que estamos trabajando. 

2. Nos permite asignar la forma que 
acabamos de dibujar en la parrilla a un cierto 
carácter, 

3. Copia la forma de un cierto carác- 
ter en la parrilla. Esta opción es buena para 
modificar un carácter que ya hemos definido. 

4, Pulsando esta opción podemos gra- 
bar o leer desde cinta una serie de caracte- 
res que hemos definido y que queremos leer 
o grabar. 

5. Nos permite utilizar la pizarra para 
dibujar en ella con los caracteres que hemos 
definido. 

6. Pulsando esta opción nos aparecerá 
otro menú con más opciones. Estas las vere- 
mos un poco más adelante. 

7. Borra la parrilla para volver a em- 
pezar. Lo que hubiésemos dibujado en ella se 
borraría y no quedaríz almacenado. 

8. Nos permite volver al BASIC. 


Si hemos pulsado la opción 6, nos apa- 
recerá otro menú en pantalla con otra serie 
distinta de opciones. Estas se pueden ver en 
la figura 2. 


En este caso sólo tenemos seis opcio- 
nes. Veamos para qué sirve cada una de ellas. 
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1. Nos permite volver al menú gene- 
ral. Este es del que hemos partido pulsando la 
opción seis para llegar a éste. 

2. Nos invierte el contenido de la 
parrilla. Todos los puntos iluminados los apa- 
gará y todos los puntos apagados los ilumi- 
nará. 

3. Hace que el contenido de la parri- 
lla cambie y se ponga como si fuese un espejo 
vertical del contenido anterior. 

4. Realiza la misma función, pero en 
sentido horizontal. 

3. Nos permite rotar el carácter, BIT a 
BIT, hacia la izquierda. 

6. Nos permite rotar el carácter hacia 
la derecha. 


y 
Con estas instrucciones queda claro el 
funcionamiento del programa. Es conveniente 
que el lector lo utilice durante algunas horas 
para familiarizarse con él y para llegar a en- 
tender cómo funcionan y para qué sirven cada 
una de las opciones. 


EL TALLER DEL HARDWARE EA 


= Proceso digital de señales 


ON los últimos circuitos pre- 
sentados deberemos estar 
ya al corriente de cómo ad- 
quirir las señales del mundo 
analógico externo, tanto de 
señales de audiofrecuencia 
como de cualquier tipo de 
señales cuya frecuencia no 
sea muy elevada. El proceso que se ha indica- 
do era de tipo básicamente analógico, median- 
te filtros y controlado por el ordenador como 
mero instrumento de selección y actuación. 
El ordenador puede, sin embargo, em- 
plearse como parte fundamental del proceso 
de las señales, pues una vez almacenada la in- 
formación digitalizada puede tratarse como 
cualquier otro conjunto de datos. Vamos a pre- 
sentar la forma de tratar las señales para co- 
nocer su contenido en las diferentes frecuen- 
cias y el proceso necesario para filtrar las que 
sea necesario eliminar o extraer para su utili- 
zación. 


E” Análisis de señales periódicas 


En casi todas las técnicas y en la física 
es muy frecuente encontrar fenómenos que 
presentan carácter periódico, es decir, fenó- 
menos en los que los valores de las cantida- 
des se repiten a intervalos regulares de tiem- 
po. Estos fenómenos se representan por una 
fórmula matemática en la cual hay una varia- 
ble que da el mismo valor para la función, para 
valores múltiplos de dicha variable. 

Las funciones más conocidas que pre- 
sentan esta propiedad son las funciones seno 
y coseno, cuyo período es 2 rr, es decir, se de- 
fine como período el intervalo de la variable 
que produce la repetición del valor de la fun- 
ción. 
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y = coseno (x) 


7 y = seno (x) 


Fig. 1. 


Señales seno y coseno. 


Supongamos que un determinado expe- 
rimento relacionado con señales acústicas nos 
ha proporcionado una señal durante un deter- 
minado período de tiempo. Sería muy intere- 
sante poder conocer el contenido de los armó- 
nicos presentes en la señal para saber las ca- 
racterísticas del instrumento que lo produjo. 
Con el analizador de señales de audiofrecuen- 
cia podríamos sacar una idea de la distribu- 
ción de energía en cada una de las bandas en 
las que colocamos los filtros. Pero, ¿no podría- 
mos utilizar el ordenador para hacer el análi- 
sis de manera más eficiente y con mayor re- 
solución? La respuesta es afirmativa si progra- 
mamos la máquina con el programa adecuado 
de análisis digital de señales. 


Fig. 2. Señal fisica generada en un experimento. 


”» 
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El desarrollo en serie de armónicos de 
una soñal periódica se ha realizado desde 
hace muchos años, mediante la fórmula de 
Fourier, que da los coeficientes de cada uno 
de los armónicos para producir la señal anali- 
zada. El análisis requiere la integración o 
suma del producto de la señal analizada por 
la senoide del armónico. El proceso consiste 
en multiplicar la señal por la senoide corres- 
pondiente en el intervalo analizado, y realizar 
la integración o suma del área encerrada por 
la curva en dicho intervalo. 

Cuando la señal es obtenida experi- 
mentalmente, las operaciones de multiplica- 
ción y suma han de hacerse de forma aproxi- 
mada utilizando herramientas que permitan 
representar las magnitudes en forma medible, 
como áreas o tensiones eléctricas. Durante 
muchos años se han utilizado los denominados 
planímetros, que mediante ruedas y mecanis- 
mos de precisión dan el valor del área en- 
cerrada en un recinto plano. En casos más ele- 
mentales, el proceso consistía en contar cua- 
draditos. 


Area = suma de cuadraditos 


Fig. 3. Cálculo elemental del área bajo una curva. 


. 


“+ Con la llegada de los ordenadores el 
proceso puede realizarse de foma totalmente 
automática y con la precisión que se desee. La 
transformación resultante se denomina Trans- 
formación Discreta de Fourier (DFT). Existe 
además un algoritmo que permite realizar la 
transformación de manera muy rápida, por 
realizarse las operaciones de forma iterativa 
utilizando operandos previamente calculados. 
Este algoritmo se denomina Transformada Rá- 
pida de Fourier (FFT=Fast Fourier Transform). 
Actualmente se emplea en todos los procesos 
de señal, en cualquiera de sus múltiple varian- 
tes. Existen incluso circuitos integrados de 
aplicación específica que realizan la transfor- 
mación en tiempo real sobre los datos sumi- 
nistrados en sus entradas. 
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La Transformación de Fourier genera 
una secuencia de números que son los coefi- 
cientes de los armónicos de la señal. ¿Cúal es 
el interés de conocer estos valores en lugar 
de la señal original? El interés principal radi- 
ca en que permite describir la señal de forma 
«resumida» con un conjunto muy limitado de 
números. En segundo lugar permite separar 
fácilmente las señales útiles del ruido que ge- 
neralmente las acompaña, pues suele tener di- 
ferente contenido espectral. Además, este 
análisis es reversible, pues aplicando el algo- 
ritmo inverso podemos reconstruir la señal ori- 
ginal, después de haber eliminado el ruido. 
Como última razón de interés es necesario ci- 
tar que las operaciones de filtrado se reducen 
a meras multiplicaciones por la función de 
transferencia del filtro, para conocer la señal 
resultante. 

El número de términos de la serie de 
Fourier que es necesario utilizar para repre- 
sentar una señal depende de las característi- 
cas propias de la señal. Un número reducido 
de componentes dará una buena representa- 
ción si la señal es «poco brusca». Una señal con 
saltos contiene muchos armónicos y, por tan- 
to, requiere una serie larga para su represen- 
tación. 


Señal suma 
— Brmónico 
primero 
Armónico 
segundo 


Armónico 
tercero 


Señal triangular 


Fig. 4. Señal triangular y tres de.sus armónicos. 


Conviene hacer algunas aclaraciones 
adicionales antes de describir el programa 
que realiza la transformación. En el empleo de 
señales senoidales en los sistemas físicos se 
acostumbra a representar las correspondien- 
tes transformaciones originadas en los siste- 
mas por las modificaciones en la amplitud y la 
fase de la señal de referencia. La señal a la en- 
trada del sistema será generalmente una se- 
noide de amplitud A y fase 0. Al pasar por una 
parte del sistema presentará la amplitud B y 
la fase. Además, pueden aparecer distorsio-. 
mes, por supuesto. Para referir al mismo ori- 
gen de fase de la señal se acostumbra a re- 
presentar mediante un diagrama vectorial la 
relación entre entrada y salida. Para indicar 
de otra manera esta diferencia de fases se 


suele descomponer la señal de salida en dos 
componentes: una R que está en fase con la en- 
trada y otra 1 que está separada 90” de ella. 
Una señal separada 90” de la función seno será 
una función coseno. A esta componente se la 
suele denominar «imaginaria», mientras que a 
la otra se la suele denominar «real». Por su- 
puesto que las dos son completamente reales, 
pero en el sentido físico de generación de po- 
tencias solamente la componente que está en 
fase produce consumo. 


Amplitud 


B Salida 


Entrada 
E a 


Fig. 8. Relación de señales entrada/salida. 


Interesa tener estas consideraciones 
presentes para entender que el resultado de 
la transformación presenta una componente 
real y otra imaginaria, dentro del contexto in- 
dicado, pues las componentes resultantes pue- 
den no estar en fase con la señal original y, 
por tanto, presentar una componente cosenoi- 
dal. 


Programa de cálculo de FFT de una 
señal 
Se muestra como ejemplo de uso de la 


FFT el proceso de una señal generada de for- 
ma sintética en las sentencias 10000 y siguien- 


tes, En un caso real deberíamos sustifuir la sub-: 


rutina indicada pór una de lectura de seña- 
les del sistema físico y asignar a las compo- 
nentes del vector X de componentes reales. El 
vector Y va asociado al X y contendrá a la sa- 
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lida la componente imaginaria de las transfor- 
madas. 


También se muestra el proceso inverso, 
pues es idéntico al directo salvo en el signo 
del cálculo de ángulos y en el factor de esca- 
la. El listado corresponde a la programación 
para el IBM-PC y compatibles, pero puesto 
que no se usan instrucciones especiales de 
gráficos puede aplicarse a los demás ordena- 
dores personales sin cambios. Los resultados 
se presentan de forma numérica y semigráfi- 
ca, utilizando el posicionamiento de un * como 
indicación aproximada del valor. Para una pri- 
mera idea es suficiente. Si se desea se pue- 
den modificar las rutinas situadas de 5000 a 
6060. 


El número de puntos utilizado en la re- 
presentación es 32, es decir, el correspondien- 
te a muestrear una señal para poder recupe- 
rar hasta el armónico número 16. Se verá que 
al reconstruirla, como la señal original tenía 
armónicos superiores, aparecen ondulaciones 
correspondientes a los alias generados, ade- 
más del pulso original de forma aproximada, 


La rutina de FFT es general y puede 
emplearse con cualquier valor de P, teniendo 
en Cuenta que el número de muestras ha de 
ser igual a 2'P, es decir, un número de potencia 
exacta de 2. Si el número obtenido en un ex- 
perimento fuera inferior, se rellenará con ce- 
ros hasta completar el número necesario o se 
tomarán las muestras entre dos pasos por un 
mismo valor que aparezca como repetitivo, 1n- 
dicando la existencia de periodicidad. 


Las líneas de la 1 a la 990 son el progra- 
ma principal, donde puede apreciarse la for- 
ma de llamar a las subrutinas. De la 1000 a la 
1600 está todo el cálculo de la transformada, 
Puede extraerse para otro programa, sólo to 
quiere la definición de los vectores X u Y, el 
número de puntos y el ID para indicar al on di. 
recta o inversa. El cálculo empieza por una 
reordenación de los valores, para soparar lan 
componentes pares de las impares. El prove: 
so principal consiste en la multiplicación de 
las señales muestrales por los valores de 40 
nos y cosenos de los ángulos del clroulo div 
dido por el número de puntos de mueatra. De 
representa mediante un diagrama de «maripo: 
sa» en el que se aprecia que cada valor se mul. 
tiplica por dos coeficientes para pasar a la lano 
siguiente, 
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Muestras Transformada 
no 1 


My Az Fig.6. Diagrama de cálculo de la FFT para 4 puntos. 


10 REM E E E E E E TE EE 
20 REM Xxx EJEMPLO DE USO DE FFT : xxx 
23 REM E E E E EE TE TEE TE TE E E 


30 TM=40:REM TAMAÑO MAXIMO DEL GRAFICO 

40 P=5: REM CORRESPONDE A 32 MUESTRAS POR CICLO 
50 B$=" 

$60 KEY OFF: CLS 

70 N=2P: PRINT " EJEMPLO DE TRATAMIENTO DIGITAL DE SEÑALES” 
80 DIM X(N),Y(N),Z (NM), INF (10), 11 (10) 

90 DIM V(13),W(13) 

100 GOSUB 10000:REM GENERA SEÑAL 

105 FOR I=1 TO Mi Z(1)=X(1): NEXT 1 

110 GOSUB 53000: REM CALCULA MAXIMO, MINIMO Y ESCALA 
120 PRINT 

130 PRINT "GRAFICO DE LA SERAL DE ENTRADA" 

140 PRINT 

150 GOSUB 6000: REM LISTADO GRAFICO 

155 ID=1: REM TRANSFORMADA DIRECTA 

160 GUSUB 1000: REM CALCULO DE FFT 

170 FOR I=1 TON 1 
180. — PRINT USING "X (GH) =HHH-4RRBR ZOO 

190 — PRINT USING ", Y (RH)=HAH.4RBRBUS IV CIDO 
200 NEXT 1 

210 FOR I=1 TON 

220 ZA 1) =SORIX(I)AX CI) Y CI) Y (10) 

230 NEXT 1 

240 GOSUB 5000: REM MAX, MIN Y ESCALA 

250 PRINT 

260 PRINT "GRAFICO DEL MODULO DE LA FFT" 

270 PRINT 

280 GOSUB 6000: REM LISTADO GRAFICO 

290 REM CALCULA INVERSA, PARA VER RESULTADO 

300 ID=-1 

310 GUSUB 1000 

320 FOR I=1 TON 


”, 330 PRINT USING "X (AH) =84HR.HHBRR IX DO 
340 PRINT USING ”, A RR) RR RR 1 Y CO 
3390 NEXT 1 


355 FOR I=1 TON: Z(1)=X(1)2 NEXT 1 
360 GOSUB 3000: REM MAX, MIN Y ESCALA 


370 PRINF 

390 PRINT "GRAFICO DE LA SEÑAL RECONSTRUIDA" 
3790 PRINT 

410 GOSUB 6000: REM LISTADO GRAFICO 

990 END 


997 REM  SUBRUTINA FFT(ID,X,.Y,F) 

1000 PRINT: PRINT "CALCULO DE LA FFT": PRINT 
1020 REM RECRDENA 

1030 FOR I=1 TO P 

1050 INF (1)=2"(P-1) 

1060 NEXT 1 

1070 FOR L=1 TON 


1080 I=1 

1090 FOR J=1 TO P 

1100 IF (11(J)<2) THEN 1140 
1110 11(9+1)=11 (J+1)+1 

1120 11(D)=0 


21130 NEXT J 
1140 FOR J=1 TOP 
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11530 I=1+11(J)X INF (3) 
1160 NEXT J 

1170 — II(1)=11(1)+1 
1180 IF L<I THEN 1250 
1190 — A=X(1) 

1200  B=Y(I) 

1210  X(1)=X4L> 

1220 — Y(I)=Y(L) 

1230  X(L)=A 

1290 — Y(L)=B 

1250 NEXT L 


1260 REM INICIALIZACION 


1270 PI=IDAS. 1415726538 
1280 M=1 

1290 FOR I=1 TO FP 

1300 KM=N/ (21M) 

1310 RS=SIN(PI/ (21M) > 
1320: — R=-4XRSARS 

1330 VOC==. AR 

1340 VS=SIN(PI/M) 
1350 FOR K=1 TO Km 


1360 CD=WC 

1370 SD=4S 

1380 £S=1 

1370 SN=0 

1400 FOR L=1 TOM 

1410 T1=L+(24Mxk (k-1)) 
1420 12=M+11 

1430 XT=X (11) 

1440 YT=Y (11) 

1450 XCS=CSXX (12) 
1460 XSN=SNMXX (12) 
1470 YCS=CSAY (12) 
1480 YSN=SNKY (12) 
1490 X(11)=XT+XCS+YSN 
1500 UY (11) =YT+YCS-XSGN 
1510 X (12)=XT-XCS-Y8N 
1520 Y (12) =YT-YCS+XS9N 
1530 CD=(RACS)+CD 
1540 CS=CS+CD 

1550 SD= (RKSN) +SD 
1560 SN=SN+SD 

1570 NEXT L 


1580 NEXT K 
1590 M=2AM 
1600 NEXT 1 
1610 RETURN 


5000 REM CALCULA MAXIMO MINIMO Y ESCALA 


so10 F=Z (1) 

5020 G=Z (1) 

5030 FOR 1=2 TO MN 

5040 IF Z(1) > F THEN F=Z(I) 
soso IF Z(1) < G THEN 6=Z (1) 
5060 NEXT 1 

5070 ES=TM/ (F-G) 

5080 PRINT 


5090 PRINT USING "MAX=4HHH.HH. — MIN=8HHR. 4, ESCALA=4H4.4R"5F.G.ES 


5100 PRINT 
Ss110 RETURN 


6000 REM SALIDA COMO GRAFICO 


6010 FOR I=1 TON 
6020 H=1+ INT ((Z (1) -G)XES) 


6030 LE=LEFTS (BS, H) +4" UALEFTS(BS, 62H) 
6040 PRINT USING "$48. ARHHR IU Z (DO 


6050 PRINT L$ 
6060 NEXT 1 


10000 REM GENERA LA SEÑAL 
10010 X(1)=1: REM EJEMPLO DE PULSO TRIANGULAR 


10020 X(2)=2 
10030 X(3)=3 
10040 x1(4)=4 
100590 x(5)=5 
15000 RETURN 


La relación entre la frecuencia de los 
armónicos y el período de muestreo es la si- 
guiente: el armónico 0 corresponde al valor 
medio de la señal en el intervalo de muestreo 
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y los valores sucesivos corresponden a fre- 
cuencias múltiplos de la frecuencia de mues- 
treo. En otras palabras X(0) dará el valor me- 
dio de la señal, X(1) e Y(1) las componentes 
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real e imaginaria del armónico primero, o fun- 
damental correspondiente a la frecuencia 1/H, 
siendo H el período completo de muestras. El 
tiempo entre muestras define el ancho de ban- 
da del espectro. La gráfica resultante resulta 
siempre simétrica, para datos reales de entra- 
da, centrada sobre la componente X(0). Por 
esta razón se suele representar la gráfica cen- 


Señal 


trada sobre el origen, presentando valores de 
frecuencia positivas y negativas. ¿Tiene senti- 
do hablar de frecuencias negativas? Sí, el mis- 
mo que tiene hablar de tiempos negativos. 
Para un sistema que manipula datos almace- 
nados podemos tomar como origen de tiempos 
cualquier punto y, por tanto, todo lo anterior 
será pasado y todo lo posterior futuro. 


Transformada 


Fig. 7. Relación entre señal y transformación. 


Ejemplo de ejecución del programa 


Para mostrar los resultados que se ob- 
tienen al ajecutar el programa se ha listado el 


LOAD"FFT6 
Ok 
RUN 


resultado del análisis de una señal triangular. 
La transformada resultante se ha representa- 
do sólo en módulo. En el listado numérico apa- 
recen las componentes real e imaginaria. 


EJEMPLO DE TRATAMIENTO DIGITAL DE SEÑALES 


MAX= 3.00,  —MIN= 


GRAFICO DE 


a 1.0000 xk 
2.0000 | 
3.0000 : 
4.0000 1 
5,0000 ; 
0.0000 i 
0.0000 5 
0.0000 5 
0.0000 | 
0.0000 : 
0.0000 | 
0.0000 ; 
0.0000 ; 
0.0000 4 
0.0000 1 
0.0000 1 
0.0000 5 
0.0000 ; 
0.0000 5; 
0.0000 5 
0.0000 i 
0.0000 ; 
0.0000 : 


EEE EA AAA 


0.00, 
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ESCALA= 8.00 


LA SEÑAL DE ENTRADA 


0.9000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0000 


E HN MEC 


CALCULO DE LA FFT 


X( 1)= 15,00000. 
X( 2)= 12.59462, 
Xt 3)= 6.49981, 
X( 4)= -0.50491, 
Xt 5)= -5.41421, 
X( 6)= -6:49558, 
Xt 7)= -4.05147, 
X( 8)= -0.06820, 
X( 9)= 3.00000, 
X(10)=" 359600. 
X(11)=  1.80883, 
X(12)= -0.87158, 
X(13)= -2.58579, 
X(14)= -2.27006, 
X(15)= -0.25717, 
X(16)= 2.01973, 
X(17)=  3.00000, 
KMBH= 201972, 
X(19)= -0.25717, 
X(20)= -2.27006, 
X(21)= -2.58579, 
X(22)= -0.8715B, 
X(23)=  1.80883, 
X(24)= 3.59600, 
X(25)=  3.00000, 
X(26)= -0.06821, 
X(27)= -4.05147, 
X(28)=. -6.49559, 
X(29)= -5..41421, 
X(30)= -0.50491, 
X(31)= '6.49981, 


x(32)= 12.57462, 


MAX= 15.00, MIN= 


Y( 1)= 0.00000 
Y( 2)= -7.29605 
Y( 3)=-11.58221 
Y( 4)=-11.34145 
Y( 5)= -7.24264 
Y( 6)= -1.67941 
Y( 7)= 2.56165 
Y( 8)= 3.75179 
Yt 9)= 2.00000 
Y(10)= -1.02318 
Y(11)= -3.19570 
Y(12)= -3,20719 
Y(13)= -1.24264 
Y(19)= 1.27289 
Y(153)= 2.66044 
Y(16)= 2.07112 
Y(17)=  0.00000 
-Y418)= —2.07112 
Y(19)= -2.66044 
Y(20)= -1.27289 
Y(21)= 1.24264 
Y(22)= 3.20720 
Y(23)= 3.19571 
Y(24)= 1.02318 
Y(25)= -2.00000 
Y(26)= -3.75179 
Y(27)= -2.56165 
Y(28)= 1.67941 
Y(29)= 7.24264* 
Y(30)= 11.34146 
Y(31)= 11.58221 
Y(32)= 7.27604 


2.60, ESCALA= 


GRAFICO DEL MODULO DE LA FFT 


15.0000 
14.5553 
13.2314 
11.3527 
9.0427 
6.7092 
4.7734 
3.7524 
3.6056 
3.7387 
3.6721 
3.3235 
2.8689 
2.6026 
2.6728 
2.8929 
3.0000 
2.8929 
2.6728 
2.6026 
2.8689 
3.3235 
3.6721 
3.7387 
3.6056 
3.7524 
4.7934 
6.7092 
9.0427 
LL 3527 
13.2814 
14.5553 


HA Ak > 
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CALCULO DE LA FFT INVERSA 


X( 1)= 18.82467, Y 1)= 0.00000 
X( 2)= 47,48519, Y( 2)= 6.46033 
X( 3)= 71.46106, Y(3)= 8.04709 
X( 4)= 735,60973, Y(«t 4)= 2.66288 
X( 39=124.70880, Y( 5)= -7.80591 
X( 6)=-30.-327903, Y( 6)=-18.52761 
X( 7)=-19.74163, Y( 7)=-24. 40106 
Xx( 8)= -7.97232, Y( 8)=-22.84002 
X( 9)= -0.08598, Y( 9)=-13%. 09953 
x(10)= 1.16707, Y(10)= -5.43346 
X(11)= -3.308899, Y(11)= 1.37685 
x(12)= -9.72025, YX (12)= 2.66712 
X(13)=-13.73725, Y(13)= -0.80626 
X(14)=-13.01531, Y(14)= -5.59827 
X(15)= -8.41054, Y(13)= -7.83187 
X(16)= -3.22408, Y(16)= -5.58875 
> X(17)= -0.97588, Y(17)= -0.00000 
x(18)= -3. 22409, Y(18)= 5.59876 
X(19)= -8.41054, Y(19)= 7.83187 
X(20)=-13.01531, Y(20)= 5.59826 
x(21)=-13.73724, Y(21)= 0.80627 
X(22)= -9,72024, Y(22)= -2.66713 
X(23)= -3. 30888, Y(23)= -1.37685 
X124)= 1.16707, Y(29)= 5.43343 
x(23)= -0.08597, Y(25)= 15.099753 
Xx(26)= -7.97234, Y(26)= 22.84002 
Xx(27)=-19.74163, Y(27)= 24.40106 
Xx (28)=-30. 327905, Y(29)= 18.52760 
Xx(279)=-33.079119, Y(29)= 7.80570 
X(30)=-32.379125, Y(30)= -2.66285 
Xx (31)=-24.53893, Y(31)= -8.04708 
X(32)=-16.51482, Y(32)= -6. 46054 


MAX= 124.91, MIN= -353.09, ESCALA= 0.25 
GRAFICO DE LA SEÑAL RECONSTRUIDA 


13.8247 
47.49352 
71.4611 
93.6088 
124.7088 
-30.3290 
-19.7416 
7.9723 
-0. 0860 
1.1671 
-3.3087 
=9..7202 
=13,7372 
-13.0153 
-8.4105 
-3.2241 
-0.9959 
3.2241 
-8.4105 
a -13.0133 
-13.7372 
=9.7202 
-3.3089 
1.1671 
-0. 0860 
2. 9723 
-19.7416 
-30. 3290 
-33. 0912 
8243913 
-24.. 5390 
-16.3148 


* 


A A e 
* 


Fig. 8. Listado de la salida del ejemplo. 


Los resultados pueden hacerse más al tratar de utilizar el ordenador como oscilos- 
atractivos utilizando la capacidad gráfica de copio digital. 
los ordenadores. Veremos rutinas apropiadas 


38 


. Conclusiones 


El proceso de análisis de una señal por 
sus componentes de Fourier implica que se 
considere periódica a la señal, con período 
igual al de la toma de datos o un divisor. En la 
práctica puede no resultar cierta la afirmación 
y presentarse efectos laterales que es necesa- 
rio considerar. Si el cálculo de la FFT se efec- 
túa sobre señales reales, para conocer su es- 
pectro es necesario «suavizar» el comienzo y 
el final de la toma de muestras, para evitar los 
efectos de borde, conocido como «efecto ven- 
tana». Se consigue el suavizado precisamente 
aplicando una función de ventana que tiene un 
máximo en el centro y decrece suavemente 
por los extremos. 

Si la señal tratada es una parte de una 
señal más amplia en el tiempo, como puede 
ser la generada por un instrumento musical o 
la voz humana, pueden estimarse las compo- 
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EPIA TEE TERA 


ER y 90 


nentes armónicas y su variación con el tiem- 
po, para apreciar la evolución de los diferen- 
tes formantes. 


Como experimentos a realizar con el 
programa presentado es conveniente empe- 
zar con señales senoidales de diferentes fre- 
cuencias, generadas por incrementos en la sub- 
rutina 10000, para apreciar el efecto de la su- 
perposición y su diferenciación mediante aná- 
lisis. También es conveniente analizar señales 
generadas mediante digitalización con «lápiz 
y papel», a partir de ejemplos de señales rea- 
les de un libro. Impresionará en seguida la pre- 
cisión obtenible con un humilde ordenador 
personal. 


La utilización del muestro de señales y 
los programas de análisis adecuados permiten 
aumentar el rango de aplicaciones en que po- 
demos emplear nuestra máquina y la potencia 
de los resultados. 


APRENDER CON EL ORDENADOR “000 


NATURALEZA Y TECNOLOGIA 


1 Efecto Doppler 


UANDO la fuente emisora 
de un movimiento ondulato- 
rio, el observador del mis- 
mo, o ambos, están en movi- 
miento relativo respecto al 
medio en el cual se propaga 
el citado, movimiento, la fre- 
cuencia que del mismo per- 
cibe el observador es distinta a la emitida por 
la fuente. Este fenómeno se conoce con el 
nombre de efecto Doppler en honor a Chris- 
tian Johann Doppler (1803-1853), quien lo puso 
de manifiesto por primera vez en 1842. 

Supongamos que el observador y la 
fuente se mueven en la misma dirección con 
velocidades V, y V,. En el instante inicial es- 
tán separados por una distancia d, y que la ve- 
locidad de propagación del movimiento ondu- 
latorio es V. 

El frente de onda emitido en el instante 
inicial en F, será recibido por el observador 
en O', depués de un cierto tiempo t, y se ve- 
rifica que 


FO' =d + 00' y que V't=d+V,' 
La onda emitida en el instante t=0 alcan- 
zará al observador en el instante 
t=d/(V-V,) 


Transcurrido el tiempo correspondien- 
te a un período T del movimiento ondulatorio, 
se emite otro frente de onda análogo al prime- 
ro. En este tiempo, la fuente habrá recorrido 
el espacio 


FF" = VÍ*T 


y es en F' donde se hace la emisión del fren- 
te. El nuevo frente alcanzará al observador en 
el instante t' y en la posición O". 
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El espacio recorrido por el observa- 
dor es 


00" =V,t' 


y el recorrido por el segundo frente de onda 
es 
F'O” =FO + 00”-FF'"=d+V,t'-V/T. 


Este espacio, puesto que el tiempo que 
está viajando el segundo frente es t'-T, debe 
ser V*(t'-T) 


V*(1-T)=d+V.t-V,*T 
con lo que el instante donde el segundo fren- 
te de onda alcanza al observador es 
t=(AHV-VID/AV-V,) 


Fig. 1. 

Por tanto, para el observador, el tiempo 
que transcurre entre dos frentes de onda 
análogos y consecutivos, o período de movi- 
miento ondulatorio según su percepción es 


T=tt=(V-V)/(V-V,)T 
La relación entre la frecuencia que emi- 
te la fuente f y la percibida por el observador 
f es 
P=(VIVJAV-V)T 


ya que la frecuencia es la inversa del período. 
En general, las velocidades deben to- 
marse con signo positivo cuando el sentido de 
la velocidad es de llegada de las ondas al ob- 
servador y negativo en caso contrario. 
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AD REM 040000006 26 6 36 MIMI 
PO REM * PROGRAMA : EFECTO DOPPLER 


40 REM * PARA IBM-PC Y COMPATIBLES, 


* 
30 REM * VERSION : 1.0 * 
» 

+ 


50 REM * SPECTRUM, AMSTRAD, MSX Y 
60 REM * COMMODORE + 
70 REM 2439662636 de de 2 3d 16 RD HI DEMI RAMA 


100 
110 
120 


PRINT"ESTE PROGRAMA CALCULA LA FRECUENCIA" 
PRINT"PERCIBIDA POR EL OBSERVADOR DE UNA " 
PRINT"FUENTE DE MOVIMIENTO ONDULATORIO EN" 


130 PRINT"MOVIMIENTO ASI COMO EL PERIODO " 


140 PRINT"PERCIBIDO." 


150 PRINT"HAY QUE INTRODUCIR LOS SIGUIENTES " 
160 PRINT"DATOS : VELOCIDAD DE PROPAGACION " 
170 PRINT"DE LA ONDA, VELOCIDAD DE LA FUENTE" 
180 PRINT"Y DEL OBSERVADOR, CONSIDERANDO ' 

190 PRINT"COMO POSITIVO EL MOVIMIENTO HACIA" 


200 PRINT"LA DERECHA." 
300 PRINT"DATOS" 
310 PRINT"=====" 


320 INPUT"VELOCIDAD DE PROPAGACION";Y 
330 INPUT"VELOCIDAD DE LA FUENTE ";F 
340 INPUT"VELOCIDAD DEL OBSERVADOR";0 
350 INPUT"FRECUENCIA DE LA SEÑAL"3S 


360 LET T=1/S 
370 LET P=T*(V-F)/(V-0) 
380 LET C=S*(V-0)/(V—-F) 


390 PRINT"LA FRECUENCIA PERCIBIDA ES DE ";C;'" HERTZIOS" 
400 PRINT"EL PERIODO PERCIBIDO ES DE ";P;' SEGUNDOS" 


PROBLEMAS MATEMÁTICOS 


Recursividad 


Se dice que un objeto es recursivo 
cuando forma parte de sí mismo o se define 
en función de sí mismo. La recursión aparece 
no sólo en matemáticas, sino también en la 
vida diaria. Por ejemplo, es recursiva la ima- 
gen creada en una peluquería cuando nos co- 
locamos entre dos espejos situados en planos 
paralelos. 

La recursión es un medio particular- 
mente poderoso en matemáticas, sobre todo 
en las definiciones. 

*. La potencia de la recursión reside en la 
posibilidad de definir un número infinito de 
objetos mediante un enunciado finito. De igual 
modo, un número infinito de operaciones de 
cálculo puede describirse mediante un pro- 
grama recursivo finito, incluso si este progra- 
ma no contiene repeticiones explícitas. De 
cualquier forma, los algoritmos recursivos son 
apropiados principalmente cuando el proble- 


ma a resolver, o la función a calcular, o la es- 
tructura de datos a procesar, están ya defini- 
dos de forma recursiva. 

Los algoritmos recursivos son particu- 
larmente apropiados cuando el problema a re- 
solver o los datos a.tratar se definen de forma 
recursiva. Sin embargo, esto no significa que 
tales definiciones recursivas garanticen que la 
mejor forma de resolver el problema sea un al- 
goritmo recursivo. De hecho, la explicación 
del concepto de algoritmo recursivo mediante 
ejemplos inapropiados ha sido la causa prin- 
cipal de que se haya creado una antipatía ge- 
neral hacia el uso de la recursión, asociándo- 
se recursión a ineficacia. 

Como programas ejemplo para ilustrar 
el tema de la recursividad se han propuesto 
el cálculo del factorial de un número y la re- 
solución del problema de Las Torres de Hanoi. 

Se define como factorial de un número 
natural como el producto de ese número por 
todos los números naturales menores que él. 
Por definición, el factorial de 0 es 1. El progra- 
ma consiste en un bucle (recursividad) donde 
se van obteniendo los productos sucesivos. 


40 REM sedes dd 1 MI IRM MR RR 
20 REM * PROGRAMA : FACTORIAL 


30 REM + VERSION 2 1.0 


* 
+ 


40 REM * PARA IBM-PC Y COMPATIBLES, MSX, + 
50 REM * AMSTRAD, COMMODORE Y SPECTRUM + 
E lll 
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100 
110 
120 
130 
140 
145 
150 
160 
170 
175 
180 


INPUT'"NUMERO"3N 
PRINT N; 
FOR I=N-1 TO 1 STEP -1 


LET N=N*I 
PRINT “*"51; 
NEXT 1 
PRINT:PRINT 
PRINT"=";N 


La resolución del problema de Las 
Torres de Hanoi consiste en mover discos si- 
tuados en un poste A a otro poste B utilizando 
como auxiliar un poste C, y teniendo en cuen- 
ta que no puede colocarse un disco encima de 
otro menor. 

Por ejemplo, la salida del programa 
para el caso de cuatro discos sería 


Fig. 2. 


10 REM 
20 REM 
30 REM 
40 REM 
5O REM 
60 REM 
100 INPUT'"NUMERO DE DISCOS"5N 


* VERSION : 1.0 


* PARA IBM-PC Y COMPATIBLES, MSX, 
* AMSTRAD, COMMODORE Y SPECTRUM 
PMH IMM RIMA DA RR 


PRINT"ESTE PROGRAMA CALCULA EL FACTORIAL DEL NUMERO" 
PRINT“NATURAL INTRODUCIDO" 


IF 1/15=INT(1/15) THEN PRINT:PRINT 


NUMERO DE DISCOS? 4 
MOVER DISCO 1 DE A 
MOVER DISCO 2 DE 
MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 

MOVER DISCO 


Ac 

AA 
AB 
ad 
AR 
BA 
Ac 

aAR 
AB 
ca 
AR 
ca 
AC 

AR 
AB 


FAROE 
+ PROGRAMA : TORRES DE HANOI 


+ 
* 
+ 
* 


110 LET X$="A"3LET YS$="B":LET Z$="C" 


120 GOSUB 1000 

130 END 

1000 IF N=1 THEN PRINT"MOVER 
1010 LET N=N-1:LET D$=Y$S:LET 
1015 LET D$=YS:LET Y$=Z$:LET 
1020 PRINT"MOVER DISCO "5N¿" 
1030 LET N=N-1 

1040 LET Dé=XS:LET X$=Z$:LET 
1050 GOSUB 1000 

1055 LET N=N+4 

1057 LET D$=XS:LET X$=Z$:LET 
1060 RETURN 


SOCIEDAD 


Historia de la música 


La música es sin duda el arte que más 
audiencia tiene hoy en el mundo: la radio, la 
televisión y el cine tienen que servirse conti- 
nuamente de ella y prácticamente no se pue- 
den concebir sin su ayuda. Por otra parte, la 
música se convierte en un compañero insepa- 
rable del hombre, desde su infancia a su ve- 


DISCO 1 DE "5X$;" A ";YS 
Y$=Z$5:1LET Z$=D$:GOSUB 1000 
Z$=D$ 

DE "3X$;3" A "¿Ys 
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¿LET N=N+1+RETURN 


jez, y en todas las circunstancias de su vida. 
El estudio de la Historia de la Música es, des- 
de esta perspectiva, algo absolutamente nece- 
sario para la formación del hombre. 

La música como todo arte tiene una re- 
lación estrecha con el mundo que le rodea, 
hasta tal punto, que nunca se puede entender 
prescindiendo de su situación estética, social 
y artística de la sociedad en que surge esta 
música, y de la misma manera, este arte pro 
vendrá de las necesidades de expresión de 
cada cultura. Esto quiere decir que como la 


APRENDER CON EL ORDENADOR 


pintura, escultura, arquitectura o literatura, va 
a tener una función importante y QuereBte en 
cada época, 

Por ello en el programa se propone un 


test para que que compruebes el estado de tu 
cultura musical y en concreto, que compruebes si 
sabes encuadrar a los principales compositores 
de todas las épocas en su movimiento cultural. 


AD REMO 26d 2020 M0 6 AIM III 

20 REM * PROGRAMA : HISTORIA DE LA MUSICA * 
30 REM * VERSION 2 1.0 

40 REM * PARA IBM-PC Y COMPATIBLES, MSX, o 
5D REM * AMSTRAD Y COMMODORE . * 
60 REM 3d ete dl Hd DM ME MI MED AMIM 

100 PRINT"EL OBJETO DE ESTE PROGRAMA ES ANALIZAR UN" 

110 PRINT"ASPECTO DE SU CULTURA MUSICAL: SABER" 

420 PRINT"ENCUADRAR MUSICOS EN SUS RESPECTIVOS" 

130 PRINT"MOVIMIENTOS MUSICALES" 

440 PRINT"PARA ELLO APARECERA EN PANTALLA EL NOMBRE" 
150 PRINT"DE UN MUSICO Y TENDRA QUE RESPONDER CON " 

160 PRINT"EL MOVIMIENTO MUSICAL AL QUE PERTENECE" 
170 DIM M$(31,2) 

175 LET R=D 
180 FOR I=1 TO 31 
190 FOR J=1 TO 2 
200 READ M$(1,J) 

210 NEXT J 

220 NEXT 1 

230 FOR 1=1 TO 10 

240 LET N=INT(RND(1)+31)+1 

250 PRINT"¿A QUE MOVIMIENTO MUSICAL PERTENECE ";MS$(N,1)3"7" 
260 INPUT AS 

270 1F A$=M$(N,2) THEN PRINT"BIEN":*R=R+1:GOTO 290 

280 PRINT"INCORRECTO. LA RESPUESTA CORRECTA ES "yM$(N,2) 
290 NEXT 1 

300 PRINT"HA TENIDO "¿R;" ACIERTOS" 

1000 DATA "ALBINONI","BARROCO ITALIANO",'"SCARLATTI", “BARROCO ITALIANO" 

1010 DATA "VIVALDI","BARROCO ITALIANO", '"PACHELBEL", "BARROCO ALEMAN” 

4020 DATA "BACH", "BARROCO ALEMAN", '"TELEMANN",'"BARROCO ALEMAN" 

1030 DATA "PURCELL", "BARROCO INGLES", '"HANDEL",''BARROCO INGLES" 
1040 DATA “"RAMEAU", "BARROCO FRANCES", "GLUCK", "BARROCO FRANCES" 

1050 DATA "MARTIN SOLER", "BARROCO ESPAÑOL", "P. SOLER", NOBREOCO ESPAÑOL" 
1060 DATA "HAYDN", "CLASICISMO",'MOZART", "CLASICISMO" 

1070 DATA "ARRIAGA", "CLASICISMO", "BEETHOVEN", "SINFONISMO" 

1080 DATA "SCHUBERT", "ROMANTICISMO", "MENDELSSOHN"", "ROMANTICISMO" 

1090 DATA "SCHUMANN", "ROMANTICISMO", "BRAHMS", "ROMANTICISMO" 

1100 DATA "BRUCKNER", "ROMANTICISMO", "FRANCK", "ROMANTICISMO" 
1110 DATA "BERLIOZ",'"ROMANTICISMO","STRAUSS", "ROMANTICISMO" 
1120 DATA "CHOPIN", "ROMANTICISMO", "LISZT",'"ROMANTICISMO" 

1130 DATA "WEBER",'"OPERA ROMANTICA", "WAGNER", "OPERA ROMANTICA" 
1140 DATA "MEYERBEER", "OPERA ROMANTICA",''GOUNOD", "OPERA ROMANTICA" 
4150 DATA "OFFENBACH","OPERA ROMANTICA","BIZET",'"OPERA ROMANTICA" 
41160 DATA "ROSSINI","OPERA ITALIANA", "BELLINI","OPERA ITALIANA" 
4170 DATA "“DONIZETI","OPERA ITALIANA", "VERDI", "OPERA ITALIANA" 
1180 DATA "PUCCINI","OPERA ITALIANA",'"BRETON","LIRICA ESPAÑOLA" 

1190 DATA "CHAPI", "LIRICA ESPAÑOLA", "CHUECA", "LIRICA ESPAÑOLA" 
ip DATA "VIVES", "LIRICA ESPAÑOLA", '"SOROZABAL","LIRICA ESPAÑOLA" 

210 DATA "MORENO TORROBA","LIRICA ESPAÑOLA", "GLINKA", "NACIONALISMO RUSO" 
1220 DATA "BORODIN", "NACIONALISMO RUSO", "RIMSKY-KORSAKOV",''NAC IONALISMO RUSO" 
1230 DATA "“MUSSORGSKI",'"NACINALISMO RUSO",'"TCHAIKOVSKI",''NACIONALISMO RUSO" 
1240 DATA "SIBELIUS",'"NACIONALISMO ESCANDINAVO", 

"GRIEG","NACINALISMO ESCANDINAVO" 

“KODALY", "NACIONALISMO HUNGARO","BARTOK", "NACIONALISMO HUNGARO” 
"DEBUSSY", "IMPRESIONISMO", '"RAVEL",'"IMPRESIONISMO" 

"SARASATE", "NACIONALISMO ESPAÑOL", '""ALBENIZ", "NACIONALISMO ESPAÑOL" 
"GRANADOS", "NACIONALISMO ESPAÑOL", "FALLA", “NACIONALISMO ESPAÑOL" 
“TURINA",'"NACIONALISMO ESPAÑOL", ''MAHLER", "ROMANTICISMO" 
"STRAVINSKI", "EXPRESINISMO", “SCHOENBERG"', "DODECAFONISMO" 


1250 
1260 
1270 
1280 
1290 
1300 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


PARA LOS MAS JOVENES 


Modificaciones para otros equipos 


SPECTRUM Animales vertebrados 


LINEA 170 DIM M$(31,2,25) En esta ocasión hemos querido dar un 


repaso a tus conocimientos sobre la fauna ver- 
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tebrada. Antes de nada vamos a repasar cier- 
tos conceptos. 

Los animales vertebrados tienen huesos 
que forman su esqueleto. Se distinguen bien 
los huesos de la cabeza y los que forman la co- 
lumna vertebral. Esta constituye una fila de 
huesos especiales llamados vértebras, que 
van a lo largo del cuerpo. 

Los MAMIPEROS tienen su cuerpo cu- 
bierto de pelos total o parcialmente, las hem- 
bras tienen mamas para alimentar a sus crías, 
tienen respiración pulmonar, su temperatura 
es constante y pueden ser PLACENTARIOS y 
MARSUPIALES. 

Las AVES tienen el cuerpo cubierto de 
plumas, las extremidades anteriores están 
transformadas en alas, se apoyan sobre dos 
patas, tienen boca con pico, y además buche 
y molleja. Respiran por pulmones y nacen de 
huevos. Atendiendo al pico y a las alas se cla- 
sifican en PALMIPEDAS, ZANCUDAS, PAJA- 
ROS, RAPACES, CORREDORAS y PRENSO- 
RAS. 


10 
20 
30 
40 
50 
60 
100 
110 


REM * PROGRAMA 


REM * VERSION : 1.0 


Los REPTILES son vertebrados terres- 
tres, tienen extremidades cortas o carecen de 
ellas, su piel está cubierta de escamas, escu- 
dos o placas óseas, se aletargan en invierno, 
respiran por pulmones, nacen de huevos y se 
clasifican en OFIDIOS, SAURIOS y QUELO- 
NIOS. 


Los ANFIBIOS tienen la piel desnuda, 
húmeda y escurridiza, poseen cuatro patas, se 
aletargan en invierno, respiran primero por 
branquias y luego por pulmones y por la piel, 
nacen de huevos y sufren metamorfosis y se 
clasifican en ANUROS y URODELOS. ., 


Los PECES son vertebrados acuáticos, 
tienen aletas pares e impares para nadar, su 
cuerpo está cubierto de escamas, respiran por 
branquias nacen de huevos y hay dos grupos 
importantes ESQUELETO OSEO y ESQUELE- 
TO CARTILAGINOSO. 


El programa te preguntará a qué tipo y 
a qué clase pertenecen diez animales elegi- 
dos al azar. 


REM OOOO II 
: ANIMALES VERTEBRADOS * 


* 


REM * PARA IBM-PC Y COMPATIBLES, MSX, +* 

REM * COMMODORE Y AMSTRAD 

REM IM HH II HR IRRIRR AR 
PRINT"CON ESTE PROGRAMA PODRAS VERIFICAR" 
PRINT"TUS CONOCIMIENTOS DE LOS ANIMALES " 


* 


120 PRINT"VERTEBRADOS. PARA ELLO, EL ORDENADOR" 

130 PRINT"TE PREGUNTARA QUE TIPO DE ANIMAL ES" 

140 PRINT"EL QUE AFARECE EN PANTALLA Y A QUE ” 

150 PRINT"CLASE FERTENECE. ASI, POR EJEMPLO," 

160 PRINT"SI APARECE EN PANTALLA “GATO” A LA" 

170 PRINT"PREGUNTA DE TIPO TENDRAS QUE RESPONDER" 
180 PRINT"MAMIFERO Y A LA PREGUNTA DE CLASE " 

190 PRINT"RESPONDERAS PLACENTARIOS. " 

200 PRINT 

210 DIM T$(5),C$(15),0$(30) ,4(30,2) 

300 FOR I=1 TO 5 

310 READ T$(I> 

320 NEXT 1 

330 FOR I=1 TO 15 

340 READ C$(1) 

350 NEXT 1 

360 FOR I=1 TO 30 

370 READ A$(I) 

380 READ A(1,1) 

390 READ A(1I,2) 

400 NEXT 1 

480 LET R=0 

490 FOR I=1 TO 10 

500 M=INT(RND(1)x30)+1 

510 PRINT"¿DE QUE TIPO ES EL SIGUIENTE ANIMAL? ";A$(N) 
520 INPUT R$ 

530 IF R$=T$(A4(N,1)) THEN PRINT"BIEN":¿R=R+1:GOTO 550 
540 PRINT"RESPUESTA INCORRECTA" 

550 PRINT"¿A QUE CLASE DE "¿T$(A(N,1));" PERTENECE?" 
560 INPUT R$ E 

S7O IF R$=C$(A(N,2)) THEN PRINT"BIEN":¿R=R+1:G0TO 590 
580 PRINT"RESPUESTA INCORRECTA" 

590 PRINT"LA RESPUESTA COMPLETA ES "¿A$(N)3" “¿T$(A(N,1))3" "sCS(A(N,2)) 
£00 NEXT 1 $ 

610 PRINT“HAS TENIDO "¿R/2;3" ACIERTOS" 

900 DATA MAMIFERO,AVE,REPTIL,ANFIBIO,PEZ 

910 DATA PLACENTARIO, MARSUFIAL, PALMIPEDA, ZANCUDA, PAJARO 
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920 DATA RAPAZ,CORREDORA,PRENSORA,OFIDIO,SAURIO, QUELONIO 
930 DATA ANURO,URODELO,OSEO,CARTILAGINOSO 

1000: DATA PERRO, 1,1,GATO,1,1,VACA,1,1,CANGURO, 1,2 

1010 DATA PATO,2,3,GAVIOTA,2,3,GRULLA,2,4,GARZA,2,4 

1020 DATA GORRION,2,5,CANARIO,2,5,BUITRE,2,6,AGUILA,2,6 
1030 DATA AVESTRUZ, 2,7,CASUARID,2,7,LORO,2,8,PERIQUITO, 2,8 
1040 DATA CULEBRA,3,9,B0A,3,9,LAGARTO,3,10,COCODRILO,3,10 
1050 DATA TORTUGA, 3,11,GALAFAGO,3,11,RANA,4,12,SAPO,4,12 
1060 DATA SALAMANDRA,4,13,TRITON,4,13,MERLUZA,5,14 

1070 DATA SARDINA,S,14,TIBURON,5,15,RAYA,5,15 


Modificaciones para otros equipos 


SPECTRUM 


LINEA 210 DIM 
T$(5,15),0$(15,15),A$(30,15),A(30,2) 
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PEQUEÑA HISTORIA DE LA INFORMATICA 00000 


1 El nacimiento de algunas 
de las más conocidas compañías 
de ordenadores 


EMOS visto que durante si- 
glos apenas si hubo avances 
en automatizar los cálculos. 
Sin embargo, en cincuenta 
años tuvo lugar una verda- 
dera revolución y se crea- 
ron mercados casi imprevi- 
sibles unos años antes. Las 
compañías que supieron ver que estaba na- 
ciendo un nuevo mercado para las máquinas 
calculadoras y tabuladoras son, casi sin ex- 
cepción alguna, las que se han convertido en 
principales fabricantes del nuevo producto, el 
ordenador, El paso de un tipo de máquinas a 
otro no fue tampoco fécil, ni sin escollos. Ni 
tampoco los ordenadores tienen mucho que 
ver con esas ruidosas máquinas de tarjetas 
perforadas. Pero han sido un paso fundamen- 
tal sin el cual, posiblemente, no se hubiera lle- 
gado a los ordenadores de nuestros días. No 
debemos olvidar que la idea de almacenar in- 
formación en las tarjetas fue providencial, en 
su momento, y ha tenido vigencia hasta hace 
muy pocos años; es más, la sigue teniendo to- 
davía, en cierto modo, ya que en nuestros días 
se sigue almacenando la información en me- 
dios externos (eso sí, algo más modernos en 
su concepción) como cintas, discos, etc. 
Comencemos por un personaje conocl- 
do: Hollerith. El hombre que utilizó y popula- 
rizó las tarjetas perforadas, dejó de trabajar 
para el gobierno en 1896. Ya explicamos que 
el gobierno intentó sustituirlo por otro perso- 
naje, que también llegó a importantes cotas 
personales, pero seguro que en aquellos mo- 
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mentos les resultaba bastante más barato, y 
además utilizaba máquinas del propio gobier- 
no, mientras que Hollerith les alquilaba las su- 
yas propias, y además a precios cada vez más 
altos. 

Hollerith fundó su propia compañía, la 
Tabulating Machines Corporation, que fue una 
compañía exitosa. Sus productos se vendieron 
por todo el mundo, y adquirió prestigio. Con 
el tiempo, la compañía fue creciendo, y Holle- 
rith decidió unir su compañía con otras com- 
pañías también importantes: la Computing 
Scale Company of America, que fabricaba ba- 
lanzas automáticas, y la Time Recording Com- 
pany (fabricante de relojes de tipo industrial 
y para edificios, etc.). El nombre elegido para 
la fusión de las tres compañías fue CTR (Com- 
puting Tabulating Recording Company). En 
esta compañía trabajó Thomas J. Watson, que 
más tarde llegaría a presidente, en 1914, cuan- 
do la compañía tenía casi mil quinientos em- 
pleados. 

A finales del siglo pasado, los aconteci- 
mientos ocurrían con mucha más rapidez que 
en siglos anteriores. Coches de caballos se en- 
tremezclaban con modernos automóviles por 
las estrechas calles mal pavimentadas en la 
mayor parte de los casos. Las empresas se mo- 
dernizaban poco a poco, pero este halo de 
tiempos nuevos no era compartido por todos. 
Muchos presidentes o directores de empresa 
se aferraban a métodos antiguos, y algunos 
acababan con sus empresas, prósperas en 
otros tiempos, pero que eran «adelantadas» 
por otras empresas, en un principio menos só- 
lidas. 

Thomas Watson fue en sus primeros 
años al frente de la nueva empresa un hom- 
bre innovador y moderno. (No ocurrió lo mis- 
mo años después, pero esto lo veremos más 
adelante.) Cuando tuvo que apostar por las 
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tarjetas perforadas, no lo dudó. Les auguró un 
futuro brillante, aunque no muchos más com- 
partieron su opinión. En 1917 se decidió a cam- 
biar el nombre de una de las ramas de la com- 
pañía (la rama canadiense) y la llamó Interna- 
tional Business Machines (IBM), Para el año 
1924 la compañía era ya enorme, contando con 
más de 300.000 empleados en varios países. 
Dado el éxito del camino comercial empren- 
dido, Watson, seguro de haber acertado, dio 
un paso más cambiando el nombre de la com- 
pañía y asignándole el de la rama canadien- 
se. IBM estaba caminando con firmeza en el 
mundo de los negocios, a nivel multinacional. 

Volvamos por un momento al pleito en- 
tre el gobierno de los Estados Unidos y Holle- 
rith. El sustituto que puso el gobierno al frente 
de sus máquinas tampoco era un bonachón sin 
aspiraciones económicas. James Powers se ocu- 
pó del Censo de 1910, pero en 1911 ya tenía 
su propia compañía, la Accounting and Tabu- 
lating Machines Company, que fabricaba má- 
quinas tabuladoras, también de tarjetas perfo- 
radas. Esta compañía pasó por muchas vicisi- 
tudes y fusiones, de las que reseñaremos la fu- 
sión con la Compañía de Máquinas de Escri- 
bir Remington (Remington Typewriter Com- 
pany) cuyo presidente era entonces James 
Rand. Y así, en 1927, la compañía pasó a lla- 
marse Remington Rand Corporation. De otra 
fusión posterior con la Sperry Gyroscope 
Company, ya (mucho más tarde, en 1950), sur- 
gió la Sperry Rand. 

Acabamos de ver que las dos compa- 
ñías fabricantes de ordenadores más impor- 
tantes a nivel mundial salieron de un mismo 
punto, el Censo de los Estados Unidos. 

Pero veamos qué ocurría en esas fechas 
en Prancia y en Inglaterra, dos de las nacio- 
nes 'europeas más industrializadas. 

Uno de los pioneros en la fabricación de 
máquinas tabuladoras que utilizaban tarjetas 
perforadas fue el ingeniero noruego Frederik 
Bull, Bull, junto con otro ingeniero, Knut Krue- 
sen, crearon una compañía en 1922, pensando 
en utilizar unas patentes de Bull anteriores a 
1914, Sus máquinas se vendieron sobre todo 
en los países nórdicos, pero algunas también 
se comercializaron en Suiza. A la muerte de 
Bull, en 1925, un grupo suizo, Egli, compró las 
patentes y en 1929 creó la compañía Egli-Bull. 
Esta compañía no duró mucho tiempo, y en 
1932 fue absorbida por otro grupo financiero, 
esta vez francés, la Caillies, adoptando un nue- 
vo nombre, basado en el creador de la mayor 
parte de las patentes; Bull. La presidencia de 
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la nueva compañía, Societé des Machines Bull, 
fue para un personaje muy 'conocido en los 
ambientes militares e industriales de la épo- 
ca, el coronel Rimalho, que era gran aficiona- 
do a las armas, e incluso había diseñado él 
mismo una pistola que tuvo bastante éxito du- 
rante la Primera Guerra Mundial. El coronel 
Rimalho, además de experto en armas, tam- 
bién era un organizador nato, y llevó su com- 
pañía con habilidad. La empresa que compe- 
tía con la Bull era en aquel momento casi úni- 
camente IBM, ya que las máquinas de Bull 
eran bastante fiables y además muy rápidas, 
casi tanto como las de IBM, las más rápidas de 
aquel momento. La compañía Bull tuvo serias 
dificultades durante la Segunda Guerra Mun- 
dial, pero supo sobrevivir, y se recuperó. 

Mientras tanto, en Gran Bretaña no esta- 
ba claro que el mercado empresarial pudiera 
absorber tantas máquinas innovadoras como 
al otro lado del océano (naturalmente conside- 
rando que la población es mucho menor). En 
1915 fue creada la Powers Samas Compa- 
ny, dirigida principalmente para vender su 
producción al gobierno, Una rama de esta 
compañía, la Powers Americana, que tenía 
ciertos convenios con la Remington, siguió 
manteniéndolos con la compañía posterior, la 
Remington Rand. Sin embargo, los ingleses, al 
menos a nivel empresarial, no estaban ni mu- 
cho menos tan interesados como los norteame- 
ricanos en invertir dinero para eliminar tareas 
burocráticas. Sin embargo, la primera máqui- 
na popular a nivel empresarial fue una tabula- 
dora creada por la Powers Samas, siendo su 
presidente Charles Foster. 

En 1920 la CTR estaba subiendo pelda- 
ños a una velocidad vertiginosa. Y fue el mo- 
mento adecuado para crear una nueva subsi- 
diaria al otro lado del mar. La nueva compa- 
ñía se llamó BTM (British Tabulating Machi- 
nes). No conocemos las razones, pero después 
de muchos años (veintisiete de su creación), 
la BTM se independizó de la casa madre. Bas- 
tantes años después (1959) las dos compañías 
británicas más importantes, Powers Samas y 
BTM, sufrieron otra nueva fusión para crear la 
International Computers and Tabulators, 

Pero ¿qué ocurría en los dos primeros 
años del siglo en España? ¿Nadie se interesa- 
ba por la automatización? A principios de si- 
glo, España era un país pobre, poco industria- 
lizado, con una riqueza mal repartida y mu- 
chos problemas internos. No es que los demás 
países no tuvieran problemas de la misma ín- 
dole, aunque de distinta importancia, pero 


comparativamente estábamos más lejos de lo 
que hoy estamos de los países europeos indus- 
_trializados. Es, pues, natural que pocos se in- 
teresasen por la automatización, existiendo 
problemas serios de industrialización. 

Sin embargo, el ingenio español nunca 
muere. Y con los pocos medios de que han dis- 
puesto generacionalmente los españoles para 
la investigación, aquellos que han tenido talen- 
to lo han aprovechado, bien en España, con mil 
dificultades, bien en el extranjero, con algo 
más de ayuda. 

Leonardo Torres Quevedo fue uno de 
estos españoles insignes. Además fue proba- 
blemente el primero que utilizara la palabra 


¿Sabía usted que... 


¿Sabía usted que la primera máquina de jugar 
al ajedrez apareció en Madrid en 1911? 

Efectivamente, y su inventor era también es- 
pañol, Leonardo Torres Quevedo. Daremos en estas 
cortas líneas una pequeña nota sobre su vida de in- 
geniero. Nació en un pequeño pueblo de Santander 
(Santa Cruz de Iguna), en 1852; murió en Madrid, en 
1936. Fue muy considerado en ambientes universita- 
rios de fuera de España, recibiendo el título de Doc- 
tor Honoris Causa por las Universidades de París y 
Coimbra. Como ingeniero, inventó el telekino, siste- 
ma para dirigir barcos a distancia, que utiliza ondas 
hertzianas, El telekino tuvo mucho éxito; el propio 
Torres Quevedo hizo las pruebas en El Abra de Bil- 
bao, y la autora de estas líneas ha oído muchas ve- 
ces a su abuelo contar la experiencia de cuando el 
señor Torres Quevedo realizó unas pruebas, movien- 
do una embarcación vacía por toda la ría, ante el es- 
tupor de los asistentes. 


autómata, o automatización. Torres estaba muy 
interesado en la automatización. Muy conside- 
rado a nivel mundial, dirigió el Centro de En- 
sayos de Aeronáutica, avanzadilla de la técni- 
ca española, pasando más tarde a dirigir el La- 
boratorio de Automática. En uno de sus artícu- 
los, Torres Quevedo indica que los «autómatas 
deben ser capaces de discriminar, es decir, 
ser capaces de tener en cuenta las impresio- 
nes recibidas hasta ese momento, para pasar 
a realizar a continuación la acción requerida. 
Deben ser capaces de imitar el comporta- 
miento humano, regulando sus acciones a las 
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impresiones recibidas, y adaptando su com- 
portamiento a las circunstancias del momen- 
to». En el mismo artículo, Torres Quevedo se 
refiere a Descartes, cuando explicaba que un 
autómata no puede hablar «razonablemente». 
Nuestro insigne ingeniero dice: «Descartes 
consideraba la idea de que el autómata pudie- 
ra llegar a razonar, cuando es el constructor 
el que razona por él.» 

En 1938, en Alemania, Konrad Zuse se 
ocupaba de construir un calculador, con lógi- 
ca binaria. Este sistema estaba comenzando a 
estudiarse para ser utilizado en calculadoras, 
y ya tenía algunos adeptos, sobre todo en 
Francia, donde Louis Couffignal defendía su 
tesis de la utilización de sistema binario para 
la creación de calculadoras programables. No 
era el único. El ingeniero español Torres Que- 
vedo se había interesado también, y un geó- 
metra de prestigio, Maurice D'Ocagne, escri- 
bió un libro sobre las nuevas máquinas de cal- 
cular. Pero volvamos a Zuse. Su primer calcu- 
lador, el Z1, aunque utilizaba un sistema bina- 
rio, era absolutamente mecánico. Realmente 
su máquina no llegó a funcionar nunca. El se- 
gundo calculador, creado algo después, el Z2, 
también era mecánico. Y su resultado no fue 
tampoco bueno. El Z3, algo posterior, ya utili- 
zaba relés, y fue construido en 1941. Este em- 
brión de ordenador, y su versión posterior, el 
Z4 dieron un resultado excelente. Sin embar- 
go, era un época difícil. La Segunda Guerra 
Europea congeló el trasvase de información 
entre los países, y supuso un enorme despil- 
farro de esfuerzo, ya que muchos descubri- 
mientos fueron realizados por varias personas 
casi al mismo tiempo, en distintos países. 
(Aunque el avance de la técnica en tiempo de 
guerra sea siempre espectacular.) 

Zuse recibió ayuda del Instituto Alemán 
de Investigación Aeronáutica, para la creación 
de su Z4. Esta industria lo utilizó ampliamente 
en sus aviones, junto con otros productos e ins- 
trumentos, también ideados por Zuse, El Z4 fue 
destruido en una incursión aérea, pero en su 
corta vida fue utilizado ampliamente para nu- 
merosos cálculos de todo tipo, desde contro- 
les de producción hasta cálculos para una 
bomba que era liberada desde un avión, y 
desde ese momento guiada por control remoto. 

Zuse fue un autodidacta. No había leído 
a Babbage y apenas a Descartes, aunque, des- 
de luego, sí había estudiado a Leibniz a fondo. 
(Es importante hacer notar que Zuse era un 
nazi convencido, que se ocultó en 1945 para 
salir a la luz pública en 1948, ya pasados los 
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primeros rencores de la guerra.) Sus ideas po- 
líticas no le impidieron ser un cerebro brillan- 
te. Introdujo en su ordenador la «coma flotan- 
te» e inventó un lenguaje de programación 
universal algorítmico, pasando a programar 
sus máquinas con pericia. Pero la guerra lo 
dejó obsoleto, ya que sus soluciones no fueron 
conocidas en el momento por los otros países 
avanzados en estas técnicas, y cuando pudo 
rehabilitarse y volver a su trabajo (1950) los 
avances tecnológicos se habían basado en so- 
luciones muy diferentes de las suyas. 

En 1950 Zuse montó una pequeña com- 
pañía, que, tiempo después, fue absorbida por 
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la potente Siemens AG, fabricante de instru- 
mentos eléctricos y electrónicos, ordenado- 
res, y muchas otras cosas más. 


Terminaremos esta pequeña diserta- 
ción con una polémica: ¿cuál fue el primer or- 
denador, el Z4 de Konrad Zuse o el EINAC nor- 
teamericano? Nosotros no sabemos contestar. 
Los dos utilizaban técnicas parecidas (relés, 
etcétera), pero eran dos productos muy dife- 
rentes: la Z4, una máquina relativamente pe- 
queña, y el ENIAC, enorme. ¿Pueden conside- 
rarse ambos dentro del mismo esquema? Opte 
el lector por la opción que prefiera. 
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El videotexto 


L videotexto tiene como ob- 
jetivo fundamental transfor- 
mar el televisor doméstico 
en terminal de ordenador. 
De esta forma, el gran públi- 
co podrá tener acceso a ser- 
vicios informáticos amplísi- 
mos, que podrían resolverle 
desde pequeños problemas hasta consultas 
más sofisticadas, como, por ejemplo, recabar 
cierto tipo de información de difícil acceso, y 
cuya obtención, en ciertos casos, lleva un tiem- 
po considerable. También pueden tener fines 
didácticos, 

La idea primitiva fue la que acabamos 
de exponer. Poner en contacto al gran públi- 
co con las grandes redes de bases de datos 
existentes, Y era una idea ambiciosa. La infor- 
mación podía obtenerse por dos sistemas, un 
sistema interactivo, o simplemente difundido. 
Los métodos pensados fueron el teléfono y la 
difusión por televisión, al que llamaremos des- 
de ahora teletexto. 

Naturalmente, la difusión de informa- 
ción por televisión requería sistemas nuevos, 
agradables de ver y cómodos. Y es el momen- 
to en el que se acrecienta el interés por los 
gráficos y otros tipos de presentación en co- 
lor. Los primeros gráficos y dibujos que se 
creaban utilizaban simplemente caracteres 
especiales (mosaicos gráficos) para la presen- 
tación de la información. Estos caracteres es- 
peciales es muy frecuente que formen parte 
de alguna ampliación del conjunto de carac- 
teres estándar con que contaba el ordenador 
de que se tratara. Cada uno de estos caracte- 
res mosaico está formado por una de las seis 
posibilidades que se pueden obtener divi- 
diendo un rectángulo en seis zonas iguales, 
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pudiendo tener a su vez cada zona un estado 
diferente: o blanco o negro. Cuando se traba- 
ja con color, se pueden considerar dos colo- 
res distintos, uno «de texto» y otro «de fondo», 
pero el problema es sustancialmente el mis- 
mo. : 

Como las necesidades del momento 
tampoco requerían mayores avances técnicos, 
y además el mercado no estaba maduro para 
recibirlo, el trazado de diagramas y otros di- 
bujos con estas fuentes adicionales de carac- 
teres constituía una técnica aceptable. 

Sin embargo, en nuestros días este sis- 
tema es ya burdo (ya que existen muchos otros 
infinitamente mejores), y aunque sigue utili- 
zándose por estar disponible fácilmente en al- 
gunos ordenadores, va sustituyéndose paula- 
tinamente por otros sistemas. Citaremos tres 
cuyas ventajas e inconvenientes radican prin- 
cipalmente en la utilización que vaya a hacer- 
se de ellos: el sistema de mosaico, el sistema 
geométrico, y, finalmente, el sistema fotográ- 
fico. 

El primer sistema es casi exactamente 
aquel del que hemos estado hablando unas lí- 
neas más arriba. Sin embargo, ha sufrido gran- 
des mejoras, pudiendo disponerse de varios 
conjuntos de caracteres adicionales. Á su vez, 
cada carácter puede estar formado de forma 
distinta a la antes descrita, como, por ejemplo, 
mediante zona en forma de diagonal, etc., con 
lo que se pueden obtener caracteres muy di- 
ferentes, y, lo más importante, creando carac- 
teres con posibilidades de ser redefinidos di- 
námicamente (también llamados caracteres 
DRCS —Dynamically Redefinable Character 
Sets—). Este último sistema permite definir los 
caracteres de forma absolutamente arbitraria, 
e incluirlos en otro conjunto de caracteres 
fuente adicional. Así pues, son caracteres ab- 
solutamente «a la medida» de cada aplicación 
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especial, disponiendo además de la ventaja de 
poder ser almacenados en la memoria del or- 
denador, de donde serán obtenidos llamando 
a la fuente de caracteres tantas veces como 
sea necesaria. (Piénsese, por ejemplo, en apli- 
caciones matemáticas que utilizan símbolos 
muy especiales, en química, en música, etc.) 

Otro posible enfoque del problema es 
utilizar técnicas geométricas basadas en cier- 
tas posibilidades de que disponen algunos ter- 
minales gráficos que trabajan en alta resolu- 
ción (aunque no es imprescindible que sea 
alta resolución). El sistema se basa en consi- 
derar la información compuesta por multitud 
de atributos, que son codificados para su uti- 
lización, Entre estos atributos están líneas, ar- 
cos, círculos, polígonos, etc., por un lado, y por 
otro, los atributos del color. Este sistema de 
presentar las imágenes (al menos en princi- 
pio), es independiente de la resolución en la 
que se está trabajando, y además presenta la 
ventaja de que se puede manipular utilizando 
sistemas gráficos y de animación, Por ello, es 
un sistema bastante eficaz. Sus detractores (en- 
tre los que se encuentran aquellos que utilizan 
o fabrican sistemas de las otras opciones po- 
sibles) argúiriían que el decodificador que tra- 
tara la información de las imágenes debería 
ser muy sofisticado, y que, para conseguir 
crear imágenes con realismo, hace falta ser un 
verdadero artista. 

La tercera opción es, desde luego, la 
más realista. Se utiliza en aquellos casos en los 
que las opciones anteriores no han ofrecido la 
resolución adecuada, o cuando sea necesario 
que las imágenes tengan un realismo más acu- 
sado. En este caso, la imagen se codifica línea 
por línea y punto por punto, para ser-enviada 
o almacenada. Así, se obtiene una imagen de 
«nivéles de gris» (ya explicamos este punto al 
tratar el tema de la visión artificial) o con una 
información de los colores. El principal pro- 
blema que presenta esta opción es que la in- 
formación correpondiente a cada imagen está 
compuesta por muchos datos que deben ser 
procesados, de forma que la velocidad utiliza- 
da por el videotexto supone una limitación 
enorme. Se han intentado solventar los proble- 
mas, limitando el tamaño de las imágenes y 
también mediante un sistema de codificación 
moderno (transmisión progresiva). Es eviden- 
te que con este sistema se pueden óbtener 
imágenes más reales y perfectas que con los 
sistemas anteriores, pero las complicaciones 
que lleva implícitas hacen que sólo sea prefe- 
tido en las ocasiones en las que los sistemas 
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de mosaico o geométrico no cumplan las espe- 
cificaciones necesarias. 

El videotexto en estos momentos está 
pasando por una crisis de identidad. Existen 
muchas tecnologías y sistemas que compiten 
y coexisten con él, siendo las diferencias poco 
claras. Así, existen sistemas educativos infor- 
matizados (Plato), otros sistemas de juegos 
electrónicos que utilizan el televisor domésti- 
co (Playcable), bancos de datos públicos o pri- 
vados, redes de ordenadores personales, etc. 
¿El futuro previsible del videotexto? No lo sa- 
bemos, aunque creemos que posiblemente 
el acceso a base de datos sea su futuro más 
brillante. Sin embargo, no existe mucho acuer- 
do en este último punto, como tampoco lo exis- 
te en alcanzar un estándar a nivel mundial. 
Hoy en día existen tres estándares, el CEPT 
(Conférence Européene des Postes et Tele- 
graphes), que supone un esfuerzo europeo, 
basado fundamentalmente en el sistema de 
mosaico, pero muy perfeccionado, utilizando 
muchas fuentes de caracteres fijos, caracteres 
modificables dinámicamente, etc., con PLPS 
(Presentation Level Protocol Syntax), es el sis- 
tema adoptado por los Estados Unidos y el Ca- 
nadá. Este sistema utiliza las tres opciones dis- 
cutidas en las líneas anteriores, haciendo qui- 
zá hincapié en la opción geométrica. Los japo- 
neses, a su vez, muy avanzados en fotografía 
(y actualmente en informática) han desarrolla- 
do el sistema de codificación Captain, pensan- 
do fundamentalmente en la codificación de in- 
formación procedente de imágenes fotográfi- 
cas. Estos tres sistemas son absolutamente in- 
compatibles. Sin embargo, esperamos tiempos 
mejores. 

El problema fundamental que presenta 
el videotexto es la velocidad. El videotexto no 
dispone de movimiento eliminando así las po- 
sibles interacciones entre el usuario y el sis- 
tema. Este problema es fundamental, ya que 
le resta vida. Además, la mayoría de los pro- 
gramas educativos que intenten enseñar cual- 
quier disciplina se basan en sistemas interac- 
tivos, ya que las técnicas modernas conside- 
ran que la participación es un elemento fun- 
damental en el aprendizaje. 

Los terminales «inteligentes» tienen re- 
suelto el problema anterior, resultando mucho 
más «vivos». Por otro lado, los decodificadores 
de videotexto están compuestos por un micro- 
procesador, una memoria RAM (lectura y es- 
critura), una memoria ROM (sólo lectura) un 
teclado, e interfaces de comunicación, casi 
exactamente igual a un pequeño ordenador 
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Sistema informatizado para la educación de sordomudos. 


doméstico. Esta identidad es muy interesante, 
ya que con pequeñas modificaciones, de cos- 
to reducido, se podría ofrecer un producto 
muy interesante, que utilizaría programas ob- 
tenidos de la base de datos del videotexto, y, 
como puede verse, las posibilidades serían 
enormes. 

El sistema adoptado por los Estados 
Unidos y el Canadá, el PLPS, es un lenguaje 
descriptivo de imágenes estáticas, de forma 
que para producir algún tipo de movimiento 
no hay más solución que borrar cada pantalla y 
redibujar de nuevo. Otra posible solución con- 
siste en cambiar los colores, o permutar el co- 
lor del fondo con el del texto. En principio, el 
método puede parecer poco interesante, pero 
dominando las técnicas se pueden obtener re- 
sultados muy aceptables (naturalmente de- 
pendiendo mucho del artista que realice la 
animación, de forma que con otros medios no 
sería necesario que el «animador» tuviera tan- 
ta experiencia ni tuviera necesariamente que 
estar tan dotado artísticamente). 

Sin embargo, la simplicidad del sistema 
es muy importante. El decodificador utilizado 
no tiene por qué ser demasiado complejo, y, 
por tanto, puede utilizarse casi cualquier mo- 
delo provisto naturalmente de memoria y ge- 
nerador de vídeo. 
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Para este tipo de tareas también existe ma- 
terial especializado. Por ejemplo, se puede 
disponer de un conjunto típico, el TI9918A, que 
dispone de unos registros especiales de di- 
reccionamiento que permiten almacenar 
«sprites» en cualquier punto de la pantalla, 
cambiando su posición a cualquier otra coor- 
denada muy sencillamente. De este modo se 
obtiene una flexibilidad enorme, lo que redun- 
da en productos de una viveza e interés muy 
grandes. Para adaptar estos sistemas a video- 
texto sería necesario crear los «fondos» y los 
«sprites» con el PLPS. Esto se hace creando 
unas cadenas con ciertos delimitadores, de 
forma que «todo» lo que se encuentre entre 
dos delimitadores se considerará un «sprite» 
que permanecerá en la posición inicial, pero 
será desplazable a cualquier punto de la pan- 
talla, tal como antes indicamos. 


Muchos ordenadores convencionales 
disponen de este conjunto TI99, por lo que re- 
sultan óptimos para juegos. La televisión ofre- 
ce anuncios en los que se ve el mismo orde- 
nador utilizado para jugar y para trabajar, El 
problema fundamental es la terrible falta de 
acuerdo entre organismos para crear una nor- 
mativa adecuada. La mayoría de los sistemas 
existentes son absolutamente incompatibles. 
Los requerimientos básicos para que el siste- 
ma de videotexto funcionara de forma cada 
vez más rentable y útil, serían una mayor com- 
patibilidad, grandes bases de datos, con posi- 
bilidad de seleccionar entre muchas opciones, 
tecnología típica de juegos electrónicos y or- 
denadores «caseros» con características gráfi- 
cas especiales. 


Los programas de enseñanza asistida 
son un ejemplo típico del videotexto. Sin em- 
bargo, como antes explicamos, la enseñanza 
asistida por ordenador es mucho más efectiva 
si es interactiva, por lo que los esfuerzos se 
han encaminado principalmente en aumentar 
la velocidad y también en mejorar las presen- 
taciones. Un programa muy interesante es el 
desarrollado por Robin Hight por encargo de 
la John Hopkins University. Es un ensayo pen- 
sado para sordomudos e incluso otras perso- 
nas que tienen dificultades de audición. El sis- 
tema tenía como objetivo enseñarles a leer la 
fonética de las palabras en los labios. El pro- 
grama distinguía diecinueve sonidos distintos, 
y ofrecía imágenes mostrando los dientes, la 
lengua y los labios. El ordenador en el que se 
procesaba es un sencillo Apple Il de 48 K. El 
programa convertía las frases en dibujos con 
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los correspondientes sonidos. A primera vista, 
puede parecer imposible que se pueda utili- 
zar una memoria tan pequeña para almacenar 
tanta información, más el sistema operativo, 
etcétera. Sin embargo, el problema fue resuel- 
to por Hight dividiendo las imágenes en com- 
ponentes, que pueden a su vez condensarse 
en tablas con datos. Cada vez que se necesite 
generar una nueva imagen, ésta puede ser 
creada fácilmente tomando los elementos de 
la tabla. 

La animación del prográma se obtiene 
por el método de memorias alternativas. Mien- 
tras se está visualizando una forma de boca en 
la primera página, se está dibujando la segun- 
da en la página dos, para a continuación pa- 
sar a presentar la segunda, mientras se gene- 
ra la tercera, y así sucesivamente. Con este 
método se puede conseguir hasta quince imá- 
genes por segundo, que es una calidad sufi- 
ciente. 

El color es otro factor importante a es- 
tudiar en videotextos. El problema fundamen- 
tal es que los colores suelen cambiar sustan- 
cialmente bajo condiciones distintas. Es muy 
distinto si se observan desde cerca, donde los 
contrastes son intensos, que si se ven desde 
lejos, donde tienden a desdibujarse. Por ejem- 
plo, si se coloca un determinado rojo junto a 
un verde, el rojo se acrecentará, resultando 
reforzado. Si se coloca junto al amarillo, pare- 
cerá algo azulado; si es junto al azul, parecerá 
algo amarillento. Además, el negro hace más 
profundos los colores, y el blanco ilumina y 
aclara mucho más. Todas estas consideracio- 
nes deben tenerse en cuenta al crear páginas 
y dibujos. El color de fondo es también muy 
importante, ya que puede resultar animante o, 
por el contrario, resultar muy cansado si se va 
a trábajar varias horas con el ordenador. A 
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continuación, daremos unas pequeñas normas 
sobre colores: 

El rojo y el amarillo son colores dinámi- 
cos, fuertes, que llaman la atención del espec- 
tador. Pueden, pues, utilizarse para resaltar 
zonas del dibujo, frases, líneas de un diagra- 
ma, etc. 

El azul y el verde son colores relajan- 
tes y tranquilos. Pueden utilizarse como fondo 
o para frases o zonas del dibujo que no se va- 
yan a resaltar. 

El color de fondo más relajante para tra- 
bajar es el gris, compuesto por una mezcla a 
partes iguales de rojo, verde y amarillo. El 
blanco no es recomendable en absoluto, ya 
que cansa mucho a los ojos. El negro es difícil 
de obtener. 

Los colores oscuros sobre fondo negro 
resultan muy pobres, parecen perderse. 

Colores de una intensidad y brillo se- 
mejantes situados próximos ofrecerán un poco 
contraste, pero, por el contrario, serán des- 
cansantes para la vista. 

Los colores de intensidad y brillo muy 
diferentes ofrecerán contrastes acusados, lla- 
mando la atención de la vista, pero resultando 
cansados. 

Para ralizar presentaciones llamativas, 
es útil seleccionar un color de texto fuerte 
(moderadamente) sobre el color de fondo 
complementario. 

Las figuras tienen mucha más entidad 
si están bordeadas por algún color que con- 
traste con la propia figura. 

Los «artistas» de la animación dominan 
estas y muchas más técnicas, relacionadas 
muchas veces con la fotografía, y estamos se- 
guros que, con el tiempo, la animación y pre- 
sentación de imágenes en el monitor llegará a 
ser un arte más. 


TERMINOLOGIA 


Captain. Sistema de codificación de gráficos 
empleado por los japoneses que utiliza téc- 
nicas fotográficas. Es especialmente eficaz, 
por esta razón, en el manejo de gráficos ob- 
tenidos a partir de fotografías. 


Caracteres DRCS. (Dinamically Redefina- 
ble Character Set). Juego de caracteres re- 
definibles dinámicamente. Los sistemas que 
utilizan estos caracteres, junto con los carac- 
teres fuente básicos del sistema, aportan 
una mayor flexibilidad en el momento de di- 
señar los gráficos. 


Caracteres fuente. Conjunto básico de ca- 
racteres utilizados en la preparación de un 
gráfico o de un texto. Suele estar almacena- 
do en memoria de un modo permanente 
(aunque en ocasiones es modificable). En 
contraposición a este juego básico, se suele 
utilizar otro conjunto de caracteres variable 
definido en cada momento por el diseñador. 


Caracteres geométricos. Juego de carac- 
teres gráficos que se construyen a partir de 
figuras geométricas elementales: rectas, 
segmentos, arcos, sectores y segmentos cir- 
culares polígonos, etc. 


Caracteres mosaico. Juego de caracteres 
gráficos especiales, que complementan el 
juego estándar, construidos mediante la di- 
visión del espacio de un carácter en peque- 
ñas zonas, coloreables de forma indepen- 
diente. 


CEPT. Conférence Européene des Postes et 
Télégraphes. (Conferencia Europea de Te- 
légrafos y Correos). En videotexto se utili- 
zan estas siglas para designar el estándar 
definido por dicha conferencia: básicamen- 
te un sistema de mosaico muy perfeccio- 
nado. 
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Color de fondo. Color de base que adopta 
la pantalla en presencia y sobre el que se 
dibujan los gráficos y texto, 


Color de texto. Suele designarse con este 
nombre, al color con el que se escribe el 
texto sobre el color de fondo, y también, por 
extensión, al color utilizado en el trazado de 
dibujos y gráficos. 


Decodificador. En videotexto, interface que 
obtiene la imagen presentable en pantalla, 
a partir de la información codificada recibi- 
da. Es uno de los componentes de la esta- 
ción receptora de videotexto. 


Fuente. (Ver Juego de caracteres fuente.) 


PLPS. Presentación Level Protocol Syntax. 
Sintaxis del Protocolo para la Presentación 
de Gráficos. Estándar muy difundido en los 
Estados Unidos y Canadá, y que se basa en 
técnicas mixtas de otros sistemas varios. 


Progresiva, transmisión. Sistema de trans- 
misión específico, con una codificación limi- 
tada, utilizando el envío de gráficos. 


Sistema de animación. Procedimiento para 
dotar de movimiento a las figuras definidas 
estáticas, en cualquier conjunto de gráficos. 


Sistema fotográfico. Sistema basado en un 
barrido de la pantalla punto por punto para 
recabar la información que aparece en cada 
punto constitutivo de una imagen gráfica 
dada. 


Sprite. Figura elemental predefinida, con la 
que se construyen gráficos complejos. Estos 
sprites se almacenan de modo permanente 
durante el diseño, y son colocados en dife- 
rentes puntos del gráfico según se vayan 
necesitando. A veces se utilizan para desig- 
nar a los sprites los términos castellanos 
«fantasma», «hombrecito», «monigote», etc, 


VOCABULARIO DE INFORMATICA * 


Lenguaje máquina. Lenguaje del más bajo 
nivel, de entre los utilizados por el ordena- 
dor. Es interpretado directamente por su 
CPU, y utiliza muy eficazmente todos los re- 
cursos de hardware. 


Lenguajes de programación. Conjunto de 
caracteres y reglas con los que se puede es- 
cribir un programa de ordenador. Entre los 
más conocidos están el BASIC, PASCAL, 
FORTRAN, COBOL, FORTH, ADA, etc. Sue- 
len denominarse también lenguajes artifi- 
ciales. 


Less equal. Término inglés para designar 
menor o igual que. Suele indicarse con los 
símbolos < =, 


Less than. Término inglés para designar me- 
nor que. Suele indicarse con el símbolo <. 


Letra. Símbolo gráfico que utilizado solo o 
combinado con otros símbolos representa 
palabras de un lenguaje escrito. No deben 
confundirse las letras con otros símbolos del 
lenguaje como comas, etc., llamados carac- 
teres no alfabéticos. 


Level. Término inglés para designar nivel o 
grado de subordinación dentro de una je- 
rarquía. 


LF. Siglas que representan la palabra inglesa 
Line Feed, que significa salto de línea. 


Library. Término inglés que significa biblio- 
teca. Véase, pues, biblioteca. En ocasiones 
suele utilizarse el anglicismo librería. 
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Librería, rutina de. Rutina probada con an- 
terioridad y almacenada en una librería o 
biblioteca de programas. 


LIFO. Siglas correspondientes a Last In, First 
Out, último en entrar, primero en salir. Mé- 
todo de control de una cola de espera para 
proceso. El sistema seguido es que el últi- 
mo que llega es el primero que se procesa. 
(Sucede como en un tubo de almacenamien- 
to, cerrado permanentemente por un extre- 
mo, lo primero que se saca es lo último que 
se introdujo.) 


Línea. Término que puede referirse a mu- 
chas cosas. Por ejemplo, línea de retardo, lí- 
nea acústica, línea de referencia, línea de 
flujo, etc. 


Lineal, optimización. Método básico de op- 
timización utilizado en programación li- 
neal. 


Líneas, impresora de. Dispositivo que im- 
prime a un mismo tiempo todos los caracte- 
res de una línea. En contraposición con im- 
presora de caracteres. 


Linker. Programa que realiza la unión entre 
varios programas, rutinas o subprogramas. 
A veces se nombra por el término castella- 
no equivalente: encadenar. También se uti- 
liza como sinónimo el concepto de «monta- 
dot». 


Linking. Término inglés que indica un pro- 
cedimiento por el cual se unen distintas par- 
tes de un programa o varios programas uti- 


lizando para ello otro programa, al que se 
denomina linker. 


List processing. Término inglés para desig- 
nar un proceso de los datos en forma de lis- 
ta. El orden lógico de los elementos se pue- 
de cambiar, por lo general, sin alterar en 
absoluto sus posiciones físicas respectivas. 
Existen lenguajes específicos para el mane- 
jo de listas (LISP, LOGO...), aunque se pue- 
den utilizar en estas tareas también los len- 
guajes de uso general. 


Lista. Colección ordenada de elementos. 
También puede referirse a un listado de or- 
denador. 


Lista de espera. Conjunto de programas o 
rutinas que están esperando para ser proce- 
sados. 


Load. Término inglés que significa cargar, in- 
troducir elementos en los sistemas de alma- 
cenamiento o en los registros de trabajo. 


Load and go (cargar y ejecutar). Técni- 
ca operativa en la que no existen detencio- 
nes entre las fases de carga y ejecución de 
un programa, y que puede incluir también 
ensamblaje y compilación. 


Load and store (cargar y almacenar). 
Términos ingleses que designan un modo 
de almacenamiento no muy utilizado hoy en 
día. Consiste esencialmente en que la 
carga del programa y su posible compila- 
ción y ensamblaje se realizan y concluyen 
por almacenamiento del código objeto. 


Load, modo. En algunos ordenadores que 
pueden aceptar longitudes distintas para 
las variables, transmisión que mueve los da- 
tos junto a ciertos delimitadores. En contra- 
posición al «modo move». 


Loader. Término inglés para designar un car- 
gador, es decir, un programa que sirve para 
cargar en la memoria central otros progra- 
mas. El cargador que carga el primer pro- 
grama, nada más conectar el ordenador, se 
designa con otro término inglés, bootstrap, 
aunque a veces también se llama IPL (Initial 
Program Loader). 


Local. Término muy general, que puede apli- 
carse a muchos términos. En informática se 
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utiliza en contraposición a global. Puede 
aplicarse, por ejemplo, a variables (es lo 
más común), a redes, a transmisiones, etc. 


Local area network (LAN). Término inglés 
que designa una red de área local, es de- 
cir, una red de comunicaciones que enlaza 
varias estaciones definidas en modo local, 
es decir, establecida dentro de un mismo 
entorno, edificio, etc. 


Local, modo de eco. Devolución de la infor- 
mación a su fuente primitiva que se produ- 
ce de forma local. 


Local, optimización. Producción de código 
objeto óptima en algún sentido. General- 
mente, se dirige a explotar de la mejor for- 
ma posible las características especiales de 
la arquitectura de la máquina. 


Local, red. Red de comunicaciones formada 
por varias estaciones establecidas en un 
ámbito local. En contraposición a la red de 
comunicaciones remotas establecidas a tra- 
vés de la línea telefónica. 


Location. (Ver Posición.). 


Lock. Término inglés que indica bloqueo o 
cerrojo. Se utiliza fundamentalmente como 
medio de protección, por ejemplo, en un ar- 
chivo al que se puede acceder, pero no mo- 
dificar, etc. 


Lockout. Término inglés para indicar el blo- 
queo. Suele referirse a un mecanismo que 
se establece para controlar el acceso a un 
recurso compartido. 


Locks and keys. Término inglés que desig- 
na un sistema de memoria en el que cada 
uno de los segmentos establecidos en ella 
tiene asignado un número, al que se puede 
acceder desde el sistema operativo, obte- 
niendo la autorización correspondiente. Es, 
en suma, un sistema de protección de la in- 
formación. 


Lógica. Ciencia del razonamiento. Estudia la 
verdad o falsedad de las proposiciones que 
son la expresión del pensamiento. La lógica 
matemática utiliza medios matemáticos de 
discernimiento. En informática, cuando se 
habla de lógica, suele entenderse lógica 
booleana. 


Lógica, instrucción. Instrucción que ejecu- 
ta una operación lógica en álgebra boolea- 
na. Utiliza los símbolos AND, OR, NOT, etc. 


Logical. (Véase Lógica.) También se utiliza 
este término, puesto de moda por los fran- 
ceses, para designar al conjunto de progra- 
mas que gobiernan el funcionamiento del 
ordenador: lo que los americanos llaman 
software. 


Lógico. Término que indica un concepto, 
algo virtual, en contraposición a físico, o 
real, Referente a la lógica. 


Lógico, diagrama. Diagrama que represen- 
ta un diseño lógico, o la estructura general 
de un proceso. En algunos casos a la imple- 
mentación de hardware. 


Lógico, diseño. Especificación de las rela- 
ciones existentes entre las partes de un sis- 
tema, en términos de lógica simbólica, y sin 
considerar de forma inmediata la imple- 
mentación de hardware. 


Lógico, elemento. Dispositivo que realiza 
una función lógica, en contraposición a los 
dispositivos físicos del sistema. 


Lógico, símbolo. Símbolo utilizado para re- 
presentar un elemento lógico de forma grá- 
fica. 


Lógico, operador. Operador que chucu chu- 
cu chucu. 


Lógicos, tipos de datos. Tipo de datos abs- 
tractos. También puede referirse a datos 
que incluyen valores verdaderos o falsos 
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(es decir, datos a manejar en lógica booloa 
na). 


Lógico, valor. Valor booleano, es decir, cual 
quiera de los valores verdadero o falso que 
se aplican a una proposición. Se pueden in 
dicar utilizando un único bit, aunque es [re- 
Cuente utilizar un byte. 


Logo. Lenguaje de programación de alto ni 
vel, pensado fundamentalmente con fines 
didácticos. Fue desarrollado por Seymour 
Papert. Es un lenguaje funcional con gran 
facilidad para el manejo de listas y predis 
posición para el diseño gráfico en pantalla, 


Longitud. Término que se utiliza para indicar 
el número de elementos de un conjunto. 
Suele aplicarse a palabras, caracteres de 
una cadena, número de registros de un ar 
chivo, etc. 


Loop. (Véase Bucle.) 


LPM. Abreviatura de líneas por minuto. Indi- 
ca la velocidad de impresión (para las im- 
presoras que escriben por líneas, frente a 
caracteres). 


LSD. Siglas de Least Significant Bit. (Véase Bit 
menos significativo.) 


LSI. Siglas de Large Scale Integration-Integra- 
ción a gran escala. Se utiliza para indicar 
una moderna tecnología de fabricación de 
elementos electrónicos en la que los compo- 
nentes son pequeñísimos, y se pueden in- 
troducir circuitos de hasta 10.000 transisto- 
res en un único chip o pastilla, 


